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Foreword 



As it said in the flyer for this manual, it was both easier and 
harder to do than the "Orphan Chronicles" were. Easier because 
almost everything in this manual was already written - by you, the 
user groups of the TI community. The only hard part (and it was 
tough) was selecting what to include. This manual could have been 
easily 300 or more pages. The amount of information available is a 
tribute to you, the TI users. 

I wanted to personally thank those who helped get this manual 
put together. All the authors and user groups who helped me 
assimilate this mass of information have been of immense assistance- 
In particular, Kent Sheets of the Northwest Ohio Users Group, Art 
Byers of the Central Westchester 99ers, and Terrie Masters of the LA 
99ers Users 5roup. Quite literally, this manual could not have been 
done without the help of these fine folks. 

The authors who wrote new material for this manual deserve a 
special mention. They did it for the sheer love of the TI community 
and the desire to share their wealth of information with vou. Warren 
Agee, Jerry Coffey, Scott Darling, Jeff Guide, Howie Rosenberg, 
Barry Traver, and Jonathan Zittrain all wrote along their lines of 
expertise for this manual. I will always be deeply appreciative. 

I want to remind all of you who brought this manual to send in 
the registration card to User Network 99. Terrie Masters has areat 
plans for this organization and I support her efforts to unite the 
user groups and the non-affiliated TI users for the distribution of 
information. I hope to be able to work with her in making updates 
available for this manual. To get the information to you, she will 
need your address. Mail the card in right away. 

Dedication? Who could this manual be dedicated to other than 
YOU - the TI user. Struggling against the odds. Inventing. 
Ingenious. Sharing. Thanks to you, we are all alive and well. 



Ron Albright, Editor 
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"we CAN do it! 

Principal Survival Principles For Life in the Orphanage" 

by Barry Traver 
Genial Computerware 

The TI-99/4A is alive and well and living in ... Philadelphia, 
Boston, Chicago, Los Angeles, Seattle, Ottowa, Washington, D.C., and 
elsewhere! In many respects, more exciting things have happened 
recently for the benefit of Tl'ers than took place while Texas 
Instruments was still officially supporting the computer. 

Life in the orphanage, however, is different in many respects. 
Losing a parent sometimes draws the family closer together, and 
Tl'ers know the reality of that, but - now that we have to "make it 
on our own" - there are important computer "rules of life" to put 
into practice so as to continue to exist as a thriving corranunity or 
family. It will take a cooperative effort, but "we CAN do it" if we 
remember three "principal survival principles": Cottaging, 
Archiving, and Networking. (If you remember the phrase, "we CAN do 
it", the word CAN provides you with a merfiory key for remembering 
these three principles of operation: _C_ottaging, _A_rchiving, and 
_N_etworking.) These three will be described one by one, since the 
meaning of the terms by themselves may not be immediately evident. 

First, we need some background to understand what is meant by 
Cottaging. Whatever people may call it, we are in the midst of a 
third major cultural revolution. The first major economic 

orientation was the agrarian or agriculture-oriented society. Simply 
put, this means that many people worked on their own farms, and those 
who^ didn't usually also had home-oriented or family-oriented 
businesses. To put it one way, a person's workbase was his own home 
or cottage. 

Then came along the Industrial Revolution. What this meant was 
that workers often did not work in, at, or near their own homes, but 
in large factories or other large business places of operation often 
some distance away. In order to earn a living, people had to leave 
home and become commuters. A man's home may have been his castle, 
but it was no longer his place of work. He no longer worked "for 
himself," but for other people, and often a large, multi-million- 
dollar company. 

If you aren't interested in a personal interpretation of 
sociological history, you can skip this paragraph and the next, but 
some may find it of interest. As I see it, one of the unfortunate 
effects of this revolution was its contribution to the weakening of 
the family, since - particularly if he was a commuter - "Dad" often 
only got to see his family a few hours each night. In addition, 
whatever good effects it may have had, the simultaneous re- 
orientation away from home-based schooling to total classroom 
schooling was another sociological change that weakened the coherence 
of the family. 



Most people probably just accept today as a "given" that the 
"normal" way for things to operate is that Dad works away from home 
and the kids go to school, but such was not the normal practice for 
millennia! It's a comparatively recent development that has only 
been in place in our country for a couple hundred years, and - 
although some people may experience "future shock" become of the 
"new" choices becoming available - there is evidence that both of 
those commonplace suppositions are being challenged more and more 
first by the increasing appearance of "cottage" industries, and the 
second by the growing home schooling movement. 

Here we come to the third revolution. We now live in a Computer 
Age, whether that is your preferred term for it or not. The computer 
revolution is producing "cottage" workers again. There are two 
reasons for this. First, even for the person who is working for a 
large company, if it is computer work, he can do it at home, 
communicating with his company's computer via modem. Second, millions 
of dollars of resources are not necessary, just a good product. Thus 
"mom-and-pop" outfits can produce (and have produced) 
superior merchandise to that released by billion-dollar companies. 

The point of application here is that we don't need Texas 
Instruments to survive, if we recognize - and support - the resources 
available from such "cottage" operations: individuals, families, or 
small companies who can provide (and are providing) items for the TI- 
99/4A that TI never provided (and perhaps never would have provided, 
even if TI had continued to support the TI 99/4A). 

Let's look at two examples. (1) TI gave us the Terminal 
Emulator II. (Before that they gave us a Terminal Emulator I, which 
was even worse!) That was not "cottage" industry: that was what a 
mammoth company was able to produce. Well, now we have FAST-TERM 
(Paul Charlton), PTERM (Richard Bryant), 4A/TALK (Thomas Frerichs and 
Michael Holmes), and MASS TRANSFER (Stuart Olson), just to name a few 
terminal emulators that offer much more than TI's TE2 did: 1200 baud 
operation, XMODEM transfers, large capture buffers, and much more. 
(2) TI gave us a 32K RAM memory card. That was it. But 128K cards 
(or better!) have been made available to us by Foundation, Horizon, 
Myarc, Mechatronics, CorComp, and others. Do you see why some people 
believe that we may actually better off now that we are not dependent 
upon Texas Instruments but are looking to "cottage" companies to 
support us? 

The second principal principle is Archiving. The reference here 
is _not_ to my ARCHIVER program - used for packing and unpacking 
related groups of files on disk - but just to collecting TI material 
in general. Why didn't I call this principle "Collecting" then? 
Well, this article is based on a talk I gave for the 1986 Boston TI 
Fayuh, which was before my ARCHIVER program made its reputation. 
And, besides. Collecting would mess up the "CAN" memory aid, so let's 
keep with the term "Archiving" here. 



The idea here is that we make sure that we collect, preserve, 
and make available what has already been done. Although there may 
some benefits in re-doing certain things, often it is wasteful of 
time and effort for people to write new programs from scratch where 
public domain programs already exist that perform the same functions 
(and perhaps more efficiently). (Even worse, people who aren't 
programmers may just "go without" because programs that they need 
have just gotten lost.) 

Two types of items actually need to be archived or collected: 
software and information. It especially takes a deliberate effort to 
preserve the latter, because often the information appears where 
preservation is not automatic: user group newsletters, notes on 
local TI BBS's, even informal conversation. Some individuals in the 
TI community have done some useful deliberate effort to preserve 
the archiving - especially Guy-Stefan Romano of AMNION Helpline - but 
a more organized effort is needed here. AMNION and some others have 
done commendably, but _all_ of us must to a certain extent become 
"archivists" for the sake of the TI community. 

Here's a _caveat ^non_-_emptor_ (excuse my bad Latin!): I am 

_not_ supporting the idea of collecting j)irated_ software. We will 
have "cottage" industries around to support us only to the extent 
that we ourselves support the TI community. You can (and should) 
personally archive original copies of copyrighted software for your 
own use, but that is one area of your archival library that you 
should not share with others. Public domain and Fairware material, 
on the other hand, you should both archive and distribute freely 
without restrictions. (And be sure to support Fairware authors, 
because Fairware software in not "free software" but "try before you 
buy" software that should be dealt with in integrity if we are to 
survive and thrive as an orphan community.) 

The third principle is the principle of Networking, which merely 
means working together as an extended family. You should belong to 
and support at least one TI-99/4A user group, and that group may be 
local or not. (For example, some groups - such as Chicago, Boston, 
and Washington, D.C. - have members that live at a distance.) Also, 
if you have a modem, you should be actively involved with electronic 
databases, whether they be commercial, national databases 
(CompuServe, the Source, GEnie, Delphi) or local TI BBS's. 

Since we can less and less look to Texas Instruments for 
specific help, we need to help one another more and more. This 
involves getting involved in specific activities that put us in 
touch with one another. In other words, we need to "plug into the 
Network." I've often had other users answer questions for me where 
Texas Instruments was of little or no assistance. That's to be 
expected, because jwe_ are the ones who are now using out TI's on a 
daily basis. 

User group newsletters and software/textf ile libraries can be a 

great help, but one of the best resources is simply "Question and 
Answer." This can be done through user groups or through leaving 



messages on TI bulletin boards. In spite of what some people think, 
Tm not professionally trained in computer science; if I know 
anything, it's because Tve asked lots of questions and listened to 
the answers, as well as listening to the conversations of others at 
user group meetings and on electronic bulletin boards (including 
especially FORUM on CompuServe, where I am currently serving as a 
Sysop). 

(Incidentally, a more formal way of making contact with what's 
going on in the TI world is through subscribing to various TI- 
oriented publications, such as MICROpendium, SMART PROGRAMMER, and 
TRAVelER (a disk-based periodical), but I hope that you're doing that 
already.) 

One other place where you can "network" or "make connections" 
with other users is in the various TI Faires that are taking place 
all across the country. In addition to Chicago, Boston, Los Angeles, 
and other places already mentioned in the first paragraph (actually, 
Philadelphia had not yet had a full-fledged Faire, but it has 
sponsored assembly language seminars by Mack McCormick and J. Peter 
Hoddie), other localities have sponsored such special specifically TI- 
99/4A events (e.g., Milwaukee and TICOFF in New Jersey). Here is 
where you can get to meet and talk in person with the "Who's Who's" 
of the TI world. 

During the years that Texas Instruments was officially 
supporting the TI-99/4A, we had only _one_ such Faire: the TI-FEST 
in San Francisco. Now that we are orphans, however, announcements of 
new Faires are a regular occurrence. As an orphan, however, you will 
get little benefit from your TI-99/4A unless you put these three 
principal principles into practice: the Cottaging (i.e., realizing 
that individuals and small companies can put out products equal or 
superior to those from TI), Archiving (i.e., collecting in a 
systematic way what has already been done for our machine), and 
Networking (i.e., working together with other Tl'ers). We CAN 
survive _and__ thrive: not merely as "orphans," but - as what we have 
become - as __family_! 



Editor's Note: Mr. Traver ri surely oni who practices what he 
preaches. He has been an active participant in all three areas that 
he recommends to i)thers. Most notably, the "Cottager" aspect. As 
owner of Genial Computerware (835 Green Valley Drive, Philadelphia, 
PA), he has produced the "TRAVelER Diskazine", first (really) 
"magazine-on-disk" for the TI 99/4A. This highly-acalaimed 
publication has been phenomenally accepted by the TI users and has 
brought such innovative programming techniques as the "Archiver" 
utility that Barry mentions above - the first file compressor and 
library utility for the 99/4A, among others. The announced 
association of J. Peter Hoddie with Genial is sure to bring about 
some incredible and innovative hardware and software from this 
"Cottage Industry". Barry also has his son, John Calvin, involved in 
"cottaging" as John has a business distributing disks of public- 
domain software. The Travers are, surely, a "third-wave family". 
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COMPUTER MUSIC 



We can write music with a list of 'CALL SOUND' statements, but 
that is very cumbersome and uses too much memory. It would bb possible 
to write an entire composition using only one 'CALL SOUND' statement 
(with the exception of leading in or trailing notes.) 

My method uses a main 'CALL SOUND' statement with all of the notes 
listed in 'DATA' statements. It will be easier to debug if each 'DATA' 
statement is one bar. Quite a few beginning prcsgrammers seem to have 
dataphobia, hut 'DATA' statements are very easy to use. The following 
examples play the same five notes for one second each. Since there are 
only five notes, each program has five lines. If I added ten more 
notes, the first program would have fifteen lines but THE 'DATA' 
program would still be only five lines long. This memory savings would 
augment to an exponential factor with longer programs. 

In the second example, we put the 'CALL SOUND' statement in a 'FOR 
NEXT' loop with the number of repetitions equalling the number of 
elements (notes) in the 'DATA' statement. Whenever the computer 
encounters a 'READ' statement, it goes off looking for some 'DATA' ,to 
read. It can be anywhere in the program. In this case, it calls the 
data 'N' for note. The note (466) is put in the 'CALL SOUND' statement 
and once a piece of 'DATA' is used it is no longer available, so the 
second time through the 'FOR NEXT' loop 'N' will be equal to 392, and 
so on. We could play the notes over again in both examples by adding a 
•GOTO 10' line at the end of the program, however, in the second 
program we would first have to add a 'RESTORE' line before we could use 
the same 'DATA' a second time around. 

The following program will play three notes at once and also 
handle different note durations using the 'DATA' statement. Look at 
the difference in the 'READ' statement, and notice in line 30 how the 
duration is changed by multiplying a single digit with the constant 
(500). To change the tempo, use a different constant 



10 REM EXAMPLE ONE 
20 FOR X=l TO 5 
30 READ N 

40 CALL SOUND ( 1000, N,l) 
SO NEXT X 

60 DATA 466,392,330,262,349 
70 RESTORE 
80 GOTO 20 

10 REM EXAMPLE THREE 
20 CALL S0Ur4D( 1000,466,1) 
30 CALL SOUND (1000, 392,1) 
40 CALL SOUND (1000, 330,1) 
50 CALL SOUND (1000,262,1) 
60 CALL SOUND (1000, 349,1) 
70 GOTO 20 



10 REM EXAMPLE TWO 
20 FDR X»l TO 5 
30 READ D,A,B,C 

40 CALL S0UND(Dt500,A, 1,B,1,C,1) 
90 NEXT X 

60 DATA 2,330,392,466 
70 DATA 1,262,330,392 
80 DATA 2,196,262,330 
90 DATA 1,165,196,262 
100 DATA 4,220,262,349 
110 RESTORE 
120 GOTO 20 



COLOR BAR GRAPHS 



This short program in Tl Extended BASIC is very simple to use. You may use from 
2 to 4 bars on each graph and each bar may be a different color. You are asked the 
maximum possible value of each bar. In other words, what is 100% performance? 
If the goal this year for the Acme Computer Company is to have each of three re- 
presentatives produce 10,000 units, then maximum performance for each repre- 
sentative would be 10,000. Minimum performance, of course, would be zero. 

The value of each bar is the relative value of each in regard to the maximum goal. 
In the example mentioned, producing 7500 units would give a representative 75% 
performance, so his bar would extend % way across the screen. The title of the 
graph will appear at the top of the screen, and the title, caption for each bar 
appears directly above each bar. The maximum and minimum values appear at the 
lower corners of the screen. 

If you are doing an audio-visual presentation and need some color bar graphs in a 
hurry, this program could be a big help. By photographing the screen of your 
monitor with a single-lens reflex camera and slide film, you could use the graphs 
in your slide shows. Or, by sending the video signal from your computer to a video 
recorder, you could tape the images for incorporation into a video presentation. 



100 CALL CLEAR 

110 INPUT "HOW MANY BARS? (2-4):" 
:B IF B<2 OR B>4 THEN 110 
120 PRINT "TITLE OF GRAPH: ":"<28 
CHAR,r-1AX)" INPUT T* : : IF LEN( 
T«)>2=« THEN 1" 
O 

130 PRINT "MAX. POSSIBLE VALUE OF 
BARS <100X):" :: INPUT MV i- : !r M 
V<0 THEM 130 
140 FDR 1=1 TO B 

150 PRINT "TITLE OF BAR#" ; I ; " : " s " 
(28 CHAR MAX.)" :: INPUT TB*<I):: 

IF LEN<TB«(1) 
)>2S THEN 150 

160 PRINT " 2-BLACK 3-MED G 

REEN":" 4-LT GREEN 5-DK BLUE": 
" 6-LT E'LUE 
7-DK RED" 
170 PRINT " 8-CYAN 9-MED R 

ED":"10-LT RED ll-DK YELLOW": 

"12-LT YELLOW 

13-DK C-REEN": "14-MAGENTA 15-G 
RAY" 

180 PRINT "ENTER COLOR OF BAR 
Ij":" INPUT C(I):s IF C(I)<2 O 
R CCD >15 THEN 
180 



190 PRINT "ENTER VALUE OF BAR #"? 
I;":" :: INPUT V(I):: IF V{1)<=0 
OR V<I)>MV THE 
N 190 

200 REP(I)=32«(V<I)/MV):: IF REP< 
IXl THEN REP<I)=1 
210 NEXT I 

220 CALL CLEAR :: CALL SCREEN (16) 
230 P*="FFFFFFFFFFFFFFFF" :: CC=9 
6 

240 FOR 1=1 TO B :: CALL CHAR(CC!, 
P«>:: CALL COLOR (1+8, C ( I ) , I ) : : CC 
=CC+8 : ; NEXT 
I 

250 DISPLAY AT (2, 15-LEN (T$) /2) : T« 
260 FOR 1=1 TO B :: DISPLAY AT(5» 
I, 1) :TB«(I) : : NEXT I 
270 CC=96 

280 FOR 1=1 TO B :: CALL HCHAR(5> 

I+l,l,CC,REP(I))s: CALL HCHAR(5«I 

+2, 1,CC,REP(I) 

>:: CC=CC+8 :: NEXT I 

290 DISPLAY AT <24, 1 ) s "0" :: DISPL 

AY AT(24,28-LEN(STR«(MV)>):MV 

300 CALL KEY (O, KEY, STATUS) 

310 IF STATUS=0 THEN 300 

320 PRINT "ANOTHER GRAPH? (Y/N) " 

:: INPUT Y$ : : IF Y«="Y" OR Y*="y 

" THEN 100 

330 STOP 



PRDSRftnniNG TIPS 



The time required to test and debug a program usually exceeds the time 
it take to rewrite the program. Several methods are available which 
will make this job easier by preventing or trapping errors which occur 
while a program is running. No one wants to spend time entering data 
and then lose it due to a program error. 

One of the easiest ways to reduce errors when writing a program is to 
use the Extended BASIC statement ACCEPT instead of the more common INPUT 
statement. Using ACCEPT will require us to give up the convenience pf 
the included prompt option available with INPUT, but will allow us to 
UALIDATE the keyboard input. There are several options available with 
UALIDATE. ACCEPT UALIDATE CUALPHA3;AS permits entry of any uppercase 
alphabetic character. Substituting DIBIT for UALPHA permits through 
S, and using NUMERIC will permit those numbers as well as: . + - and E. 

nany programs ask the user a question to be answered by ••YES" or •'NO". 
The program lines could be written: 



400 INPUT -DO YOU WANT A HARDCOPY? CY/ND" - A$ 
410 IF SEE$CA$,1,13-"Y" OR SEBSCASl , 1D-"N" THEN 440 
4S0 PRINT "PLEASE RESPOND EITHER CY3ES OR CNDO." 
430 BDTO 400 

440 IF SEB$CA$,1,13-"N" THEN END 



Using another option available with ACCEPT UALIDATE, a string may be 
entered with the characters permitted as inputs ACCEPT UALIDATE 
C"Y,N,A"3-AS permits only three characters to be entered as AS. Adding 
the SIZE option with SIZE-1, only one of the permitted characters could 
be entered. With these options, the previous example could be written: 



400 PRINT "DO YOU WANT A HARDCOPY? CY/N3":A$ 
410 ACCEPT UALIDATE C"Y/N3 SIZEC13:AS 
4S0 IF A$-"N" THEN END 



With these lines in our program, pressing any key other than Y or N will 
result in a rude honk as will any attempt to enter a second character. 
Both examples will prevent the user from entering a character which the 
computer has not been instructed how to handle and will, therefore, 
reduce the possibility of an error in your program. Branted, erroneous 
entries for the examples given will normally result in a WARNINB at the 
time of input; however, errors later in the program may have been 
prevented . 

What can you do about errors which can occur late in o program? We can 
make use of the ON ERROR statement to trap many of these errors allowing 
us to recover and continue without losing data which may have alreody 
entered. When an error occurs and the program stops, it can be 
restarted only with the RUN command. But, when RUN is entered, the 
values of our variables are lost. 
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One plocB where errors often occur is in a program which reads DATA 
sJStements. Ulhen an attempt is made to read data past the last item in 
nnATA statement the dota error message appears on the screen and the 
SrSgJam StopI An ON ERROR statement can be used to prevent this type 
of error. Consider the following program: 

110 READ A : : PRINT A 
120 GOTO 110 
130 RESTORE 

140 DATA 111. HE. 113, 114, IIS 

Runnina this progfam will print the numbers in the DATA statement in 
UnS 140 Sntil 115 have been printed. After 115, the last item m the 
DATA statement is printed, DATA ERROR in 110 is printed on the screen 
and ?JeproS^am stops. However, if we add: 100 ON ERROR 130 and change 
line 130 to: 130 RESTORE :: RETURN 110. the program will run until 
stopped by FCfN 4 or QUIT. 

Many other uses for ON ERROR can be found. Even fatal I/O errors can be 
trapped. To illustrate, check the following program: 



100 ON ERROR 240 

110 PRINT ttl:"THIS IS A TEST" 

200 ON ERROR 280 

240 OPEN #1:"PI0" :: RETURN 100 
2B0 CLOSE #1 
290 END 



Ihe first error is created by line 110 which generates on I/O error 
Since File No. 1 is not open. The error takes program execution to 
Line 240 where file No. 1 is opened as "PIO" and execution is resumed 
in Line 100. A second error is generated when an attempt is made to 
open the same file again. This is handled by Line 200 which Jumps the 
program execution to Line 2B0 which closes the file. 

A more practical application can be found in the following example using 
the CALL ERROR statement: 



100 ON ERROR 130 
110 OPEN «1:"PID" 
120 GOTO 170 

140 IF^W-130 THEN PRINT "ARE BOTH P.E.B. AND PRINTER ON?" 
150 PRINT "ENTER 'CON* TO CONTINUE." :: BREAK 
ISO RETURN 100 
170 END 



Here, the ON ERROR transfers the program to the CALL ERR statement. If 
W is 130 - which indicates on I/O error - the message reminding the user 
to turn on his P.E.B. and printer is displayed on the screen ond o 
BREAK in Line. 150 permits the necessary corrections to be made. CDN 
will continue program execution to Line 100 for a second try. 
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Ulhen debugging your programs, the ON ERROR can be used to trap any error 
as it occurs. A CALL ERR can be used to identify the error and the 
program steps can be uiritten to permit the error to be corrected and the 
program alloued to continue. 

The CALL ERR statement has the capability of returning four values. If 
CALL ERR CN,N,D,P3 ON ERROR and PRINT n,N,P are included in your 
program, most errors can be identified uihile the program is being 
debugged. For example: 



100 ON ERROR S50 
110 ! PROGRAM LINES 



250 CALL ERR Cn,N,0,P3 

SBO PRINT n,N,P 

B70 BREAK 

BBO ON ERROR 250 

290 RETURN EXIT 



Errors occurring in the program will cause execution to shift to Line 
250 due to the ON ERROR 250 in Line 100. Line 250 assigns variables to 
nCError Code], NCError TypeD, OCSeverityD and PCLine Number 3 . 

Line 260 prints the values assigned to the variables. [Severity is 
alujoys S and there is no need to print 0.3 Printing Ul gives the error 
code and the code number can be found in the list of error codes in the 
Extended BASIC manual. If the value of N, the error type, is "-1", the 
error occurred in o statement. P will be the line number of the 
stntement cousing the error. 

A BREAK stotement was included to provide an opportunity to the 
programmer to correct a correctable error, continue, and resume program 
execution at the line following the line in which the error occurred. 

Once an error has been processed, it is cleared and must be executed 
again to handle to subsequent error. This was done in the previous 
examples by RETURN followed by the line number of the first ON ERROR 
statement. In this example, the RETURN NEXT bypassed the ON ERROR in 
Line 100; therefore, ON ERROR 250 is repeated in Line 2B0. 

ON ERROR statements are similar to a BOSUB so far os a RETURN being 
required. Three options are available for RETURN with ON ERROR: RETURN 
□lone will resume program execution in the statement which caused the 
error; RETURN NEXT causes the program to resume in the line following 
the line where error occurred; RETURN CLine Number 3 starts execution 
with the line number specified. 
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M)DIN6 HMtD COPY TO PROGWHS by George F. Steffan 

...I MS asked several questions about converting 
prograM Mhich had output only to the screen so that 
they Mould output to a printer. I also had just done 
such a conversion for the group library. The next day, 
I received a copy of the neMsletter of the Nichita 
(Kansas)99er's Users Group (Mhich] contained a progra 
by Paul Yorlce of Florida (no credit for original 
publisher given) Mhich converted a prograa to use 
SPEECH on the TE II. I sm that this prograa could 
provide the solution to probleas of this conversion. 

Hy first thought Mas just to change SPEECH to RS 
232 but SOK people Mould need to use PIO or different 
Baud rates, so I dKided to alloM input of the desired 
output device. Also, I eliiinated restrictions on 
naaes for the original and neM progriK. I added 
provisions for either adding the ncM output de/ice to 

188 REM WOPRINT - SEPT. '85 
118 DATA 8,95,159,253,288,1, 
49,181,199,999,179,247,8,999 
128 DATA 156,253,288,1,49,18 
1,999,1«,253,288,1,49,8,999 
,255,255,999 

138 REH BY GEORGE F. STEFFAN 
, iA 99ER COmTER GROUP, P 
BOX 3547, GMOEm CA 98247 
148 REH BASED ON AN IDEA BY 
PAUL YORKE : 1288 STARFISH L 
tt€ t STUWT, FL 23494 
158 REH DISK SYSTEM REQUIRED 
1« REH 0P$ = '95 OPEN il:' 
IN TOKENIZED STOMGE 
178 REH EW - SOUTPUT* IN C 
OtCENSED DISK CODE HOKENS) 
188 REH El=e«> OF PROGRAM 
198 REM P«='PRINT II:' 
288 Ml OlfK 
218 PRINT • THIS PROGRAM NIL 
LCONUERT ANY NOK-NODULE DE 
PENDENT PROGMM TO PRINT 
TO A NAMED OUTPUT DEVICE.' 
228 PRINT :• IT DOES THIS BY 
ADDING AN OPEN STATQENT A 
M) REHRITIN6' 

238 PRINT ' Ml PRINT STATEH 
ENTS ADDING OUTPUT REQUIREHE 
NTS.' 

248 PRINT :■ PROGRAM MUST m 
VE (N.Y (K STATEKNT PER LI 
NE.' 

258 PRINT ' TIE ORIGINAL PRO 
GRAH HUST BE WJB) IN HEI^ 
FORMftT." 



screen display or using the output dp/ice instead of 
screen display. 

You should use the RESEQUENCE or RES coaand on 
your progriB before running this progri* because sate 
lines Mst be inserted betNecn lines of the original 
progran. The inserted lines are mabered 5 higher than 
the line froi Mhich they are derived. Therefore, 
resequencing is not necessary if the gap betMeen lines 
is alMays Mre than 5. 

If your copy of the original progrw is exactly 
the saae as the old copy saved Mith the MERGE conand, 
you My then speed up final rec<Mry of the program 
by using 'OLD and OLD PROGRAM NAME', then 'MERGE and 
lEM FILE NAME'. 

This progria adds ' 11: ' to any PRINT stateg«nts 
in the source program. Therefore, DO NOT USE IT on a 
program Mhich already has opened a file for output and 
contains 'PRINT I* statcMnts. 

438 G0SUBS78 :: IF C»156 TK 
Bi L2=L2tS :: 60SUB 568 :: P 
RINT t2:UmiP$tiSEG»{T« ,4 , 168 
) 

448 IF C»139 OR t>K2 THEN 6 
OSUB 568 :: GOSUB 518 :: L2= 
L245 :: GOSUB 568 :: PRINT i 
2tlM^ei(T$,3,i6i) 
458 GOTO 428 

468 L2=L2tl8 :: GOSUB 568 :: 
60SUB 518 

478 PRINT «:E$ :: CLOSE II 
:: CLOSE 12 

488 PRINT :;:'T0 GET YOUR PR 
OGRAM YOU HU5TD0 TIE FOaOHI 
N6:':;!'ICN':;:^ER6£ ';IF$: 
;:*ICRGE ';OFi 

498 PRINT :TIE CHANGED PROG 
RAM HILL THEN BE IN HDttR 
Y AW YOU SHOULD SAME BEFO 
RERUMIN6 IT.' 
588 STOP 

518 IF P TIEN PRINT l2:Um(C 
% uM 
528 RETURN 

338 Tfs" ! am smm 

548 REM) C :: IF C<2S6 THEN 
T*>TltiCHI»(D:: GOTO 548 
S58 RETURN 

568 LNHai»(Ll-(L2>255})tcCH 
R>(L2f256I(L2)255)):: RETURN 
S78 Ll^ASCai):: L2aASC(SEG» 
(Tf,2,l)):: C>^(SEe»m,3, 
l))::RETUm 



268 PRINT :: INPUT ' PRESS E 
NTER TO CONTINUE' :T$ 
278 PRINT :' YOU HUST RESEQU 
B€L YOUR PROGRAM BEFORE S 
AMIN6 IT IN ICRGE FORMAT.':; 

e 

288 GOSUB 538 :: OP»=T$ 
298 GOSUB 538 :: Btt=T$ 
388 GOSUB 538 :: P<»T» 
318 GOSUB 538 :: CS»T$ 
328 GOSUB 538 :: E8»T« 
338 PRINT :: INPUT 'PROGRAM 
TO BE C(N«tTED? ':IF« 
348 PRINT :: OfUT 'NAME OF 
MODIFIED PROGRAM? ':0F$ 
358 IF QFt^lH TIEN PRINT 'N 
MCSMUST BE DIFFERENT!' :: 
GOTO 338 

368 PRINT :: LIlfUT 'NA»E OF 
OUTPUT 0B;ICE? *:00$ 
378 PRINT :'A - M)D OUTPUT T 
DB;ICE':;:'C - CHANGE FROH 
SCREEN TO OUTPUT DEVICE': 
p'SELECriON' 

388 ACCEPT AT(23,12)SIZE(-1) 
VIALIDATE('AC')BEEP:T8 ;: 
»(TI»'A') 

398 OPEN ll:in,DISPlAY ,m 

Item m,imf 

488 OPEN l2:aFI,DISPlAY ,VM 
lABLE 163,0UTPUT 
418 PRINT I2:OP<U»I»(LEN(00 ' 
i))UKm£N( :: M 
428 IF E0F(1)THEN GOTO 468 E 
LSE LIlfUT ll:Ti :: IF T$=E$ 
THEN GOTO 468 
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ERROR TRtffING TECWIQUES - By Ted Hills, CALL SOUKDS 
NeMsletter, Centril Hestchester 99'ers, Hay, 198^ 

(Editorial Reg»rks by Art Byers, C.H. 99'ers) 

Coqxiters generally have built-in error handling 
prxedures. At a ■inisw a coofNiter will stop when it 
encounters an error condition. But first the co^Nlter 
will store certain infortatioHy at designated Miory 
addresses, concerning the type of error encountered and 
the line where the error occurred. On ly Apple these 
error messages can only be accessed by PEEXing into 
•eonry through an error handling subroutine written 
into the progrm. Otherwise the progra» siiply stops 
when an error occurs. The TI 99/4A, however, not only 
routinely describes the error type but the line where 
it was encountered as well. (In addition the 99/4A's 
TI BASIC has som built-in error routines that (to not 
stop a program but rather issue a warning. One example 
is entering an alphabet value into an INPUT statenent 
that expects a numerical value. Another: Extended 
BASIC'S ACCEPT AT statement allows you to VALIDATE the 
type of data you want entered and will give you a 
HARNINO "honk* and refuse to accept any other than the 
data specified. See page 48 of the XB manual - Ed.) 

HS-OOS computers feature only a slight improvement 
in error handling in that the line is actually 
displayed after the program stops and places the cursor 
over the actual error. 

Error handling functions are not only used to trap 
errors in newly written, or typed-in, programs, but 
also error handling routines have useful programming 
applications. The latter were the initial purpose of 
this article. However, some general conments might 
also be appropriate. 

Extended BASIC has two error statements - ON ERROR 
and CALL ERR. ON ERROR simply tells the computer what 
to do when an error condition is encountered. 
Generally, ON ERROR will 60T0 or 60SIB to a subroutine. 

ON ERROR can be used in many ways. The most 
common is to Keep programs from crashing when the user 
does something wrong such as trying to load a blank or 
not initialized data disk, hardware goofs, i.e., you 
left the door open on the disk drive, or you misspelled 
PIO as Pie. 

CALL ERR is best used for debugging a program. 
Once the program is error free, the CALL ERR lines can 
be deleted. The Syntax of the CALL ERR subprogram 
contains four variables describing some aspect of the 
error condition. The statement is in the form GALL 
ERR(Error Code, error type, severity, line number). 
Error type simply distinguishes between program errors 
and input/output errors. Frankly, I never have 
understood the usefulness of the severity message. 
(Neither have I! - Ed.) 

So far so good! If the error is in the line where 



the error condition was encountered, life bKomes 
relatively simple. However, the error may originate 
somewhere else, such as a bad value generated earlier 
that does not show up until later. The best procedure, 
therefore, is to place an ON ERROR statement near the 
beginning of the progrmi that OOSUBs or fiOTOs an error 
trapping routine at the end. The subroutine should 
include a CALL ERR subprogram. Once the error codes 
and the line are identified then PRINT statements can 
be added to the subroutine to print out each of the 
variables in the line where the error^ condition was 
encountered. Hatch out, though, for BAD MALKs arising 
from an ii^oper use of reserved words. I once typed 
in a program, written in TI BASIC, using Extended 
BASIC. The TI BASIC version had a variable DIGIT which 
is an Extended BASIC reserved word. 

The TRACE coMand is a useful supplementary 
debugging tool. However, I prefer to insert M'H lOE 
AT (LIND' to follow program flow. If you do use 
TRACE, especially on a long and involved program, it is 
helpful to have a screen dump in low memory to print 
the TRACE flow on to paper. The one by Qualitysoft 
works very well. (Hestchester also has one in the club 
library for free.) 

The ON ERROR statement should be a useful 
programming tool. I routinely insert ON ERROR 
statements in my program that either return to the main 
menu if an error occurs or saves whatever data has been 
entered so far to disk. It is very exasperating to 
lose a lot of data when a progrm comes to a screeching 
halt due to an error. Similarly, ON ERROR can be used 
to close a file. 

Last Fall I typed in a stock charting program that 
could chart a lot of price data that I had 
acccumulated. Among the inputs for each data point 
were the day, month and year. These I entered in 
through READ/DATA statements. To check for typing 
accuracy, and to count the weeks, I included a 
subroutine which read and printed the data items. 
Instead of using an end of data identifier I simply 
used an ON ERROR message to save the data to disk as 
soon as I had run out of DATA statements. 

Some programmers hold forth that a fully debugged 
and properly written program should not need error 
traps, except to guard against the hardware errors 
discussed above. They consider use of ON ERROR as a 
proy^aMing tool to be somewhat inelegant, but I 
believe it provides an important measure of safety 
i^ich I like. 

One final comnt. It is possible to have many ON 
ERRM routines in the same program, as long as each one 
is turned on and off at the right time. For example, I 
usually insert an 'ON ERROR GOTO (Henu)'. However, an 
"ON ERROR (Save File)' heads my insert data routine. 
After the file is saved then I return to the '04 ERROR 
GOTO (Henu)" command. 
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100 ! »»♦♦» MS/LABELS »*♦*♦ By: Martin A. Sioley For EPSON Printer »§*»§ 
110 ! MorthCoast 99er'5 US 

120 OPEN f9:*P10' ! OPEN PRINTER (Could be RS232) iff Extended Basic fit 
no PRINT •9:CHRI(27);'0';CHRI(27);'8';f 

•0*=STOP skip over per<,'B*sST0P paper end detector 
MO CALL CLEAR :: CALL SCREEN (13) 

150 PRINT • ft HS/LABELS tf: PRINTS": :' 3-l/2in BY 15/16in': 

LABELS': : ; 

160 PRINT * Enter Data at Prompts •": :' You will have 4 line per*: :* label. Li 
ne II = 15 Cols.': :' Line 12 = 28 Cols.': : 

170 PRINT ' Lines 13 and 14 » 49 Cols.': : : 
180 60SUB 190 :: 60SUB 210 :: 60SUB 220 :: GOSUB 230 
190 PRINT :: PRINT 
200 INPUT 'ENTER LINE 



GOTO 240 



AAAAAAAAAAAaAAAI 



PRINT 



PRINT 



210 PRINT 
:: RETURN 
220 PRINT 

AAAAAA^AAAAj*. AA^^ 

230 PRINT :; PRINT 

AAAAAA^AAAAAAA^^ 



1 ':AI :: RETURN 
ENTER LINE 12' :: 



INPUT 



■AAAAAAAAAAAAAAAAAAAAAAA AAAAAt 



INPUT '0^^ 



INPUT •O'^ 



ENTER LINE 13' 
':CI :: RETURN 
ENTER LINE «4' 
■:DI :: RETURN 
240 PRINT :: INPUT 'HON HANY COPYS ':)( 
250 CALL CLEAR :: PRINT ' Hold >Q< to Quit Printing": 
260 FOR 1=1 TO X ! fffHti* PRINTOUT LOOP 



S|AA 



AAA2< 



lAAAAAAAAATAAA 



AAAAAAAI AAAAAAAAA^AAAAAAAAATAAA 



START DOUBLE STRIKE OPTIONAL 
START EMPHASIZED 
Start Elite-Buedakes 11=18 characters) 
START ENLARGED 



f 290 is used) 



270 ' PRINT •9:CHRI(27);'6';! 
280 PRINT •9:CHRI(27);'E';' 
290 ' PRINT •9:CHRI(27);'M-;' 
300 PRINT •9:CHR$v27);"ll';CHRI(l)j' 
310 PRINT t9:Af 

320 PRINT l9:CHR$(27);"N';CHRI(0);f 
330 ' PPINT I9:CHR$(27) ;•?•;! 
340 PRINT •9:' •;B$;CHRI(27);'F' • 
350 PRINT t9:CHRI(27)jCHRI(15};' ';«;:;' ■;DI;CHRI(1B);CHRI(27);'H'; ! 
CHRII15)=START C0NDENSEDfCHRI(18)=ST0P,'H'=ST0P DOUBLE STRK. 
360 FOR K=I TO 3 :: PRINT NEH K 

3/0 CALL Kt/(0,K,S);: IF K=81 OR K=113 THEN 390 
380 NEU I 

CALL SCREEN(6)' »t*#»f*# Beginning of TASK SCREEN 



STOP ENLARGED 
Stop Elite-sizeiNeeded 
STOP EHPHASIZED 



390 CALL CLEAR : : 
400 PRINT - Enter 
Change i \\r\9': : 
410 PRINT • 
420 INPUT " Enter 



H for More labels': 



N for Ne»- labels': 



L to 



Q to Quit the prograi': : 
your chioce: ':DOI 
430 IF D0I='H" OR DOI='i' THEN CALL CLEAR :: GOTO 240 
440 IF DOI='N' OR DOI="n' THEN 140 
450 IF DOi='L' OR DOI='l' THEN 480 
460 IF DOI="Q" OR DOI="q" THEN 520 
470 GOTO 420 

480 CALL CLEAR ' iffffift Beginning of LINE CHANGE SCREEN *f»fff« 



490 INPUT • Enter line nuiber to be 
L>4 THEN 490 

500 ON L GOSUB 190,210,220,230 
510 GOTO 390 

520 PRINT •9:CHRI(27);'«';! Initialize Printer 

530 CLOSE 19 

540 • »ti NS/LABELS 

550 END « : 



changed 1 to 4 ':L :: IF L<1 OR 



Nipe out any leftover coitands 



KS/LABELS-DOC 
"NS/LABELS* started out to be a taall, sitple 
prograi to print 3-1/2 in X 15/M in. labels for 
return addresses and disk labels, but it evolved 
into the prograt you see at the left. 

THE USER INSTRUCTIONS FOLLOV 

(1) Load the prograt (Don't run it yet). 

(2) Align your labels in the printer then turn 
the printer on. 



(3) Now RUN the prograi. 

(4) Enter the data as protpted by the progran. 
There is one circuellex (^) for each space 
on the entry line. Do not use any coiias. 

(5) After you have entered (4) lines the prograt 
will ask hoN lany labels you itant. If you 
want to see one enter 1. After the label is 
printed you will see a screen which will let 
you print (N)ore if you like what you see. 

(6) If you don't like thei enter L to change a 
line and then the line nutber you would like 
changed. You can repeat the L for as aany 
lines as you need, or you can use H for eore 
and print one at any tine until you like the 
label you have. At this point you use More, 
then type in the quantity you want and the 
printer will start running thee off. 

If you change your wind, HOLD >0< until the 
printer stops and you will return to the 
task screen. 

(7) At the task screen you can also enter an (N) 
if you want a coipletely New label or (O)uit 
to exit the prograi. 

NOTE: If your ribbon is not dark enough you 
can edit the prograi and delete the (!) 
and the space froi the beginning of line 270 
This will give you Double Strike throughout. 
Also! Doing the saie thing to line Nos. 290 
and 330 will give you 18 characters in line 
tl if your printer is capable of Elite Print 
(You will have to reieiber that you have (3) 
characters past the last (^) in line one.) 



If you do not 
are in the 



like to type, ly prograis 
NorthCoast 99er'5 Library. 
Good Luck! Narty 



ms/l_^be:l_s 

TI99/4A Extended Basic 

This Ubel was aade by the prograi listed above, 
Ln.ll^ENlARGED l2=Std. size •3U4«Condensed 
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Saueezina l^eal benefits Frcm 
Ycur 99/4 A and Geneve Systems . 

Assembly Lanauane 



This block diagram came from TI and may be of general inter.est- 
a picture is worth a thousand words! 



Tl-99/4(A) MEMORY ARCHITECTURE 



•from: 
Rockey Mountain 
99er» "TIC TALK" 



CRU FOR BANK SWITCHING 



TMS9900 
CENTRAL 
PROCESS R 



CPU MEMORY* 



CONSOLE 
ROM 

SK BYTE 


MBIORY 
EXPAN 
PART 1 

SK BYTE 


DEVICE 

SERVICE 

ROMS 

SK BYTE 


OPT-'L 
COMMAND 
MODULE 
ROM/RAM 
SK BYTE 


SEE 
BELOW 


\ \ 
MEMORY EXPANSION 
PART 2 

24K BYTES 


0000 


2000 


4000 


6000 J 


SOOO 


^000 COOO £000 



MAPPED FCfRTS=> 



FAST 


SOUND 


VDP 


VDP 


SPEECH 


SPEECH 


GROM 


GROM 


RAM 


MEMORY- 


READ 


WRITE 


READ 


WRITE ' 


READ 


WRITE 


eS300 


MAPPED 


MEMORY- 


MEMORY- 


MEMORY- 


MEMORY- 


MEMORY- 


MEMORY- 


256 


PORT 


MAPPED 


MAPPED 


MAPPED 


MAPPED 


MAPPED 


NAPPED 


BYTES 




PORT 


PORT 


PORT 


PORT 


PORT 


PORT 



SOOO 



8400 



TMS 9919 
SOUND CHIP 
WT DATA=8400 



8S00 



8C00 



9000 



TMS991SA 


RD 


DATA«S800 


RD 


STAT-8S02 


WT 


DATA»8C00 


WT 


ADDR-8C02 



9400 



9800 



TMS5200 
SPEECH SYN 



VDP RAM 
16K BYTES 



9C00 



GROM CNTRL 


RD 


DATAa9S00 


RD 


ADDR«9S02 


WT 


CIATA-9C00 


WR 


ADDR«9C02 



VOCAB ROM 
32K BYTES 



A 



GROM BANK 
GROM BANK 
GROM BANK 



0=> 

2a> 



^^ROM BANK 15'^> 



\ 



CONSOLE GROM 

( GRAPHICS READ ONLY 

MEMORY ) 

13K BYTES ACTIVE IN 
ALL BANKS 



GROM < GRAPHICS READ ONLY MEMORY > 
IN COMMAND MODULES OR PERIPHERALS 

UP TO 16 BANKS OF UP TO A OK BYTES EACH 





/ 


/ 


/ 


/ 


/ 


/ 


V- 


/ 


— / 



0000 



2000 



4000 



6000 SOOO 



AOOO 



COOO 



EOOO 



^-^^Y LINES INDICATE FEATURES INCLUDED WITH CONSOLE 



2-2 



THE SCREEN P(\SER UTILITY 
By Michael St. Vincent 



How o-ften have you wanted to look at part o-f a program as it runs or 
set up an initial instruction screen that could be stored and recalled in 
an instant? I-f you are -familiar with the almost complete impossibility o-f 
doing this, especially in the Extended BASIC environment and want to get 
-free o-f such limits, here is your answer: an assembly language subroutine 
that is short and non-compl€»x . 

Simple solutions to problems such as screen storage are o-ften 
overloked in -favor of staying strictly in one language's environment. 
Most people are un-familiar with the use-fulness o-f having machine language 
routines take over chores that are much slower in BASIC- To store a 
screen in BASIC, -for example, most programmers would use a GCHAR to read 
all o-f the screen and store the result in an array. Besides being slow 
and ine-f-f icient , a BASIC routine to do such would use large amounts o-f 
memory. 

Enter the amazing and -fast 9900 machine language routine! The 
screen, usually a set of rows and columns to a BASIC programmer^ becomes 
only a set of memory locations. In this form, moving a copy of the 
screen becomes as simple as assigning the assembly equivalent of a few 
variables and a GOSUB. Operation of the subroutines is kept simple by 
having the computer do the calculating. The possible applications of 
these subprograms are lif. ited only to the programer's imagination. 

How the pr^- gram is usedj 

The subroutines, once assembled, are some of the simplest to use. 
Loading the programs into memory is accomplished by using a CALL IMIT 
command followed by a CALL LOAD ( "DSKl . PAGER/OBJ " ) command. The routines 
ar<? automatically stored in the memory and become invisible until needed. 
Four programs are loaded simultaneously for use in Extended BASIC: 
PGSAVl, PGSAV2, PGSHOl, AND PGSH02. The SAV programs save everything on 
the screen at the instant they are called to pages 1 and 2 respectively. 
The SHO programs return the previously saved pages to the screen. All 
four programs are accessed by- CALL LINK < "pgname" ) where pgname is one of 
the program names given above. The amount of time spent by the programs 
can only be measured in microseconds. Using OLD, SAVE, MERGE, and NEW 
commands have no effect on the screens stored in memory (thus, one could 
list a program, save a screen of the list, load a new program, and still 
be able to look at the listing of the old program). The only 
restrictions on the programs are that they only store the characters, 
neither the colors nor any sprites are kept. 

How the program works: 

The programs in assembly use a simple system of setting up a block 
of CPU RAM to store pages. Cnce a screen is to be stored, the registers 
0, 1, and 2 are loaded with the address of the screen map in VDP RAM 

(000), the address of the CPU RAM block, and the number of bytes to 
transfer (768 for the full screen). A simple BLWP (branch and link with 
workspace pointer) command links to another utility routine which does 
the actual transfer. After the transfer is completed, the program uses 
the psuedo-opcode RT to reset the workspace pointer to the BASIC 

nterpeter area from where it branched. At that point, the BASIC level 
program continues to execute. 



2-3 



How to assemble and install this program on your disks: 
Using the Edi tor /Assembler package^ type in the source lis^.ing which 
-follows exactly as shown. Spacing is important to insure that the 
program will assemble properly. Once the program is typed in (you don't 
need to copy the remarks that are preceeded by an asterisk, store the 
source code (what you typed) under the -filename "PAGER /SOU". Then load 
the Assembler. When asked -for the source -filename, give 
"DSKl. PAGER/SOU", and when asked -for the object filename, give 
"DSKl. PAGER/OBJ". I-f you have a printer, give the device name at the 
prompt, otherwise, hit <enter>. The options -for assembly are "RSL" if 
you have given a printer device name, of "RS" if you haven't. Th« 
assembler should do its job within 5 minutes and should print "0000 
ERRORS" at the end. If there are any errors during assembly, refer to 
the source listing of this newsletter and compare what you typed. 
As listed, the program assembles with no errors. 



♦ THE SCREEN PAGER UTILITY 

♦ SOURCE CODE WRITTEN BY MICHAEL ST. VINCENT 

♦ USED TO STORE UP TO 2 SCREEN-FULLS FOR LATER USE 



DEF PGSAV1,PGSAV2,PQSH01,PGSH02 ♦ NAME ROUTINES 

♦ 



VMBW 


EQU 


>2024 


* 


VDP WRITE ROUTINE 


VMBR 


EQU 


>202C 


* 


VDP READ ROUTINE 


SCRMAP 


EQU 


>0O00 


* 


START OF SCREEN MAP ADDRESS 


SCRCNT 


EQU 


768 




NUMBER OF CHARACTERS IN MAP 


PAGEl 


BSS 


768 


« 


STORAGE BUFFER 1 


PAGE2 
* 


BSS 


768 


* 


STORAGE BUFFER 2 


PGSAVl 


LI 


Rl, PAGEl 


* 


ACTIVATE BUFFER 1 




JMP 


GOSAVE 




GOTO THE SAVE ROUTINE 


PGSAV2 


LI 


R1,PAGE2 




ACTIVATE BUFFER 2 


GOSAVE 


LI 


R0, SCRMAP 




STARTING POINT TO READ FROM MAP 




LI 


R2, SCRCNT 


« 


NUMBER OF BYTES TO MOVE 




BLWP 


«VMPR 


♦ 


"GOSUB" TO READ 


♦ 


RT 




* 


RETURN TO BASIC 


PGSHOl 


LI 


Rl, PAGEl 


« 


ACTIVATE BUFFER 1 




JMP 


GOSHOW 


* 


GOTO THE RESTORE ROUTINE 


PGSH02 


LI 


R1,PAGE2 


* 


ACTIVATE BUFFER 2 


BOSHOW 


LI 


R0, SCRMAP 




STARTING POINT TO REPLACE MAP 




LI 


R2, SCRCNT 




NUMBER OF BYTES TO MOVE 




BLWP 


QVMBW 


* 


••BOSUB" TO WRITE BACK TO MAP 




RT 




* 


RETURN TO BASIC 




END 




* 


TELL ASSEMBLER TO STOP 


sascsssss 






S8CSS 





If you want to use this program in BASIC with the Edi tor /Assembler module, 
change the lines to match this header: 



DEF PGSAV1,PGSAV2,PGSH01,PGSH02 ♦ NAME ROUTINES 
REF VMBR,VMBW 

SCRMAP EQU >0000 « START OF SCREEN MAP ADDRESS 

SCRCNT EQU 768 « NUMBER OF CHARACTERS IN MAP 

♦ 

Ooeration of the program is the same as desribed for Extended BASIC. 
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CAL-L. REEK 

Hello again everyone. There'-s a lot to cover this time, so let's get right to it. 
Last month's A/L Challenge was to write a program to input a line -from the 'keyboard and 
output it to a printer. Since nobody called to ask a question about device I/O, I assume 
everybody was able to get all the information they needed from the materials they have. 
Everybody DID write a program didn't they??? Just in case. Til cover a few high points 
before presenting my solution to the challenge. Most of the needed information, although 
a bit cryptic, can be found in the Editor /Assembler manual. Due to space requirements 
(and laziness on my part), Til not reprint that information here, but will offer a few 
comments on it. So... grab the manual and let's look at "File Management". 

As I said last month, one of the great things about our computer is the ability for 
our programs to interface with most peripherals in the same manner regardless of the type 
device. This is due to the use of "smart" peripheral controllers and the "file" concept. 
Read pages 291 and 292 in the E/A manual for a description on the "file" concept. Any 
device, with the exception of the cassette recorder (see the note on page 262), that can 
be accessed with the OPEN, CLOSE, INPUT and/or PRINT statements in basic can be accessed 
in assembly language, using a common subroutine provided in the E/A utilities called 
DSRLNK. Each peripheral card contains a DSR (Device Service Routine) that handles the I/O 
to that device and makes data flow to and from the device appear to us as a "file". The 
DSRLNK subroutine takes care of locating the desired device, ie. "PIO" or "DSK", and 
interfacing it with our program. Page 262 of the E/A manual contains a description of how 
to use DSRLNK. 

The key to accessing any device with the DSRLNK utility is the PAB (Peripheral Access 
Block). The PAB is a group of data that defines all information necessary to access a 
particular file on whatever device we are working with. The PAB has a strict format, and 
is always located in VDP RAM. Pages 293 and 294 in the E/A manual cover the format of a 
PAB. A PAB is 10 bytes long, plus the length of the file descriptor. A file descriptor 
is the device name, file name, and any options needed for a particular device. 
"DSKl.MYFILE" and "RS232. BA=2400" are examples of a file descriptor. The E/A manual has a 
pretty good description of the PAB, but here are a few good things to remember... The PAB 
is a two way street. In addition to its function of passing necessary information to the 
device, the device also uses the PAB to pass necessary information back to our program. 
For 5-ample, byte 1 cf the PAB is used by the device to identify any errors encountered 
during the current operation and byte 5 is used by the device to tell us the number of 
bytes read during a READ operation. Remember that byte 1 is a bit mapped byte, that is, 
more than one piece of information is passed through this one byte. Also, bytes 2-3 and 
6-7 are taken as word (16 bit) values. The data buffer address in bytes 2 and 3 always 
point to a buffer area in VDP RAM. This is where you put data that will be written to a 
file before linking to the device, and it is where data read from a file will be placed by 
the device. It is important to remember that you can change the data buffer address 
between each link to the device if necessary. For instance, you could use separate read 
and write buffers when dealing with relative files. However, you must be careful to place 
the data buffer in a VDP RAM location that will not interfere with the operation of the 
computer. Addresses between >1000 and >3000 are usually a good choice for PABs and data 
buffers in a program running out of the E/A module. 

Pages 295 thru 298 of the E/A manual describe the meanings of the I/O opcodes used in 
byte of the PAB. Page 299 describes possible error conditions. Although it is good to. 
know how error codes are passed back from a device, the DSRLNK routine transfers the error 
code to register of the calling workspace, and sets the equal bit in the status register 
if an error occurs during access to a device. See page 262 for more information. 
Hopefully, these few comments will answer any questions you may have had. If not, feel 
free to call. Now... here's my solution to A/L Challenge #2. 



0001 



TITL 'A/L CHALLENGE #2' 



0002 REF 

0003 DEF 
0004. PAB EQU 

0005 BUFFER EQU 

0006 NAMLEN EQU 

0007 COUNT EQU 



DSRLNK, VSBW, VMBW, KSCAN, VDPWD, GRMRA, GRMWA 
START 

>1000 Location of PAB 

2SB . . data buffer 

PAB+9 . . name length in PAB 

PAB+5 . . data count in PAB 
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0008 








■ • nciinc lenyun pcxnusr 


0009 








NByscan reuurns cnaracuer nere 


0010 


PTtiTI ic; 

O 1 ri i 






L.oceiLion ot brL. suauus Dyte 


0011 


GPL WS 


PDI 1 

ClUiU 




• ■ urL regisuers 


0012 


MAY 
i IMA 


CbiU 




Max char count 


0013 








use unis area tor registers 


0014 


* 








0015 




PVTF 





i/u opcoGe tor urtir4 






DVTCT 


I 


• • • LLubc. 


uui / 




dYTc. 


.^l 


WRITE 


vvxD 




BVTC 


»n 


Keycode for rUTN 4 


001 Q 


CLIN 1 lire 


DVTF 
0T 1 C. 


\rk 
/U 


> > tNTcK 


0020 


ri iR'Qnp 

wijr\wur\ 


RVTF 

T 1 IL 




unar nuniDer ot cursor 


0021 


% 








0022 




4nr 1 

T Lil 1 


PAP 




0023 




EVEN 






0024 


PABDAT 


RVTF 

O T 1 H 





I/U opcoue 


0025 








riie type oescription 


002^ 




DATA 


Pi icppp 


uata Dutter aoaress 


0027 




BYTE 


MAX 


Record length 






BYTE 





Character count 


0029 




DATA 





Record number 


OOTO 




BYTE 





Screen o-ffset 


0031 




BYTE ENDAT-FILNAM Name length 


0032 


FIL NAM 


TEXT 


'PIO' 


Filename 


0033 


ENDAT 


EQU 




Mark end of data 


0034 


t 








0035 




EVEN 




Force even address 


0036 


BRMSAV 

wi \i iw~ V 


BSS 




Save GROM address here 


0037 


lie C^AVB 

♦ wove 


GROM 


address -fisrt 




D 1 Hr\ 1 


MOVE 


@GRMRA,@GRriSAV Get MSB 


0039 




NOP 




Maste time 


0040 




MOVE 


'2GRMRA,@GRMSAV+1 Get LSB 


0041 




DEC 


QGRMSAV 


Adjust 


0042 








0043 




LWPI 


WKSP 


Load the workspace pointer 


0044 




LI 


ROjPAB 


RO points to PAB 


0045 




LI 


Rl, PABDAT 


Rl points to data for PAB 


004^ 




LI 


R2,ENDAT-PABDAT R2 has byte count 


0047 




BLWP 


©VMBW 


Write the data to VDP 


0048 




MOVB 


@0PEN,R1 


OPEN opcode to Rl 


0049 




BL 


@I0 


Open the file 


0050 


:^ 






0051 


LOOPl 


BL 


eCLB 


Clear the screen 


0052 




LI 


RO, BUFFER 


RO points to screen location 


0053 




CLR 


R3 


Use R3 for character count 


0054 


L0DP2 


MDVB 


©CURSOR, Rl 


Rl has cursor char 


0055 




BLWP 


SVSBW 


Put cursor on screen 


0056 


LOOP"': 


BLWP 


QKSCAN 


Get a keypress 


0057 




MOVB 


(£!STATUS,@STATUS Check ^or new keypress 


0058 




JEQ 


L0DP3 


Loop if no new key 


0059 




MOVB 


SKEY.Rl 


Key code to Rl 


0060 




CB 


Rl, ©BREAK 


FCTN 4? 


0061 




JEQ 


ENDIT 


Yes, prepare to end 


0062 




CB 


Rl, ©ENTER 


ENTER key pressed? 


0063 




JEQ 


PRINT 


Yes, write line to device 


0064 


* Just 


an ordinary character, put it on screen 


0065 




BLWP 


©VSBW 


Write to screen 


0066 




INC 


R3 


Increment counter 


0067 




INC 


RO 


Increment screen pointer 



0068 

0069 

0070 

0071 

0072 

0073 

0074 

0075 

0076 

0077 

0078 

0079 

0080 

0081 

0082 

0083 

0084 

0085 

0086 

0087 

0088 

0089 

0090 

0091 

0092 

0093 

0094 

0095 

0096 

0097 

0098 

0099 

0100 

0101 

0102 

0103 

0104 

0105 

0106 

0107 

0108 

0109 

0110 

0111 

0112 

0113 

0114 

0115 

0116 

0117 

0118 

0119 

0120 

0121 

0122 

0123 

0124 

0125 

0126 

0127 



CI R3,MAX Reached max line length? 

JLE LD0P2 No, continue 

Maximum line length reached i-F here 



DEC 
DEC 
J MP 



R3 
RO 

L00P3 



PRINT 



MOV R3,R1 
SWPB Rl 
LI RO, COUNT 
BLWP eVSBW 
MOVE @WRITE,R1 

BL eio 

JMP LOOPl 



Adjust count 

and screen pointer 

Get another key 

Char count to Rl 

and into left byte 

Pointer to count byte in PAB 

Write the count byte 

WRITE opcode to Rl 

Output the line 

Get another line 



ENDIT 



CLOSE opcode to 
Close the file 



MOVB ©CLOSE, Rl 
BL 610 
Restore GROM address 

MOVB @GRMSAV,i3GRMWA Write MSB 
NOP Waste time 

MOVB @GRMSAV+1,@GRMWA Write LSB 



Rl 



LWPI 
B 



GPLWS 
(£!>6A 



Load GPL registers 
Return to E/A module 



* CLS Subroutine, clears the screen 

* Uses RO;, Rl, and R2 

CLS CLR RO Beginnig screen location 

LI Rl,>2000 Space char in left byte, Rl 

BLWP eVSBW Clear first byte 

LI R2,767 Remainder count 

CLSLP MOVB Rl^eVDPWD Clear next byte 

DEC R2 Decrement count 

J^4E CLSLP Loop til done 

RT then return 



t 
t 
t 
t 

t Uses RO, Rl, R2, and R3 
10 



I/O Subroutine 

Enter with I/O opcode in Rl (left byte) 
Handles errors, ignores CLOSE errors 



lORET 
t 

ERROR 



LI 


R0,PAB 


Point to PAB 


BLWP 


eVSBW 


Write the I/O opcode 


LI 


R0,NAMLEN 


Point to name length in PAB 


MOV 


ROjdiPNTR 


Required for DSRLNK 


BLWP 


QDSRLNK 


Link to device 


DATA 


8 


For file I/O 


JED 


ERROR 


Handle any errors 


RT 




Return if no errors 


CB 


©CLOSE, Rl 


Closing the file? 


JEQ 


lORET 


Yes, ignore error 


SRL 


R0,B 


Move error code to right byt 


SLA 


RO, 1 


and multiply by 2 


MOV 


R0,R3 


Save error code in R3 


BL 


eCLS 


Clear the screen 


LI 


R0,BUFFER+2 


Location for error msg 


MOV 


@ERRTAB(R3) ,R1 Message location to Rl 


MOVB 


*R1+,R2 


Byte count to R2 



0128 




SRL 


R2!,8 


Adjust to word value 


012<? 




BLWP 


eVMBW 


Write the message to screen 


0130 


* 








0131 




LI 


R0,742 


Screen location 


0132 




LI 


Rl, PRESS 


Message pointer 


0133 




LI 


R2,21 


Byte count 


0134 




BLWP 


eVMBW 


Write to screen 


0135 


t 








0136 


ERRLP 


BLWP 


SKSCAN 


Get a key 


0137 




MOVB 


©STATUS, eSTATUS New key? 


0138 




JEQ 


ERRLP 


Not yet 


0139 




CB 


(SENTER.SKEY 


ENTER? 


0140 




JNE 


ERRLP 


No, try again 


0141 




BL 


@CLS 


Clear the screen 


0142 




B 


SEND IT 


End the program 


0143 










0144 


ERRTAB 


DATA 


BDNMSG 


Bad device name 


0145 




DATA 


DWPMSG 


Device write protected 


0146 




DATA 


BOAMSG 


Bad open attribute 


0147 




DATA 


ILOMSG 


Illegal operation 


0148 




DATA 


OBSMSG 


Out o-f buffer space 


0149 




DATA 


EDFMSG 


End of file 


0150 




DATA 


DVCMSG 


Device error 


0151 




DATA 


FILMSG 


File error 


0152 


* 








0153 


BDNMSG 


BYTE 


16 




0154 




TEXT 


'Bad Device 


Name ! ' 


0155 


DWPMSG 


BYTE 


26 




0156 




TEXT 


'Device is write protected!' 


0157 


BOAMSG 


BYTE 


19 




0158 




TEXT 


'Bad OPEN attribute!' 


0159 


ILOMSG 


BYTE 


18 




0160 




TEXT 


'Illegal operation!' 


0161 


DBBMSG 


BYTE 


20 




0162 




TEXT 


'Out o-f Bu-f-fer Space!' 


0163 


EOFMSG 


BYTE 






0164 




TEXT 


'Attempt to 


Read Past EOF!' 


0165 


DVCMSG 


BYTE 


13 




0166 




TEXT 


•"Device Error ! 


0167 


FILMS6 


BYTE 


11 




0168 




TEXT 


'File Error 


1 9 


0169 


PRESS 


TEXT 


'Press <ENTER> to end.' 


0170 




END 







Here's a short description of how the program works... 

Lines 1-3 assign a title to the assembly listing, inform the assembler which pre-defined * 
utilities and symbols we'll be using, and defines START as a label to be placed in the 
ref/def table when the program is loaded. 

Lines 4-13 equate various labels to values to be used in the program. Notice that the 
value field for the labels NAMELEN and COUNT contain "well defined expressions". These 
labels are referenced from the label PAB. By using expressions such as these you are 
able to change the values of several related labels by changing only one line in the 
program. See page 49 in the E/A manual for the description of a well defined 
expression. 

Lines 15-20 place 6 one byte values in the object code that will be used by various 
routines in the program. 

Line 23 contains an EVEN directive. This directive tells the assembler to make sure the 
location pointer is at an even address. Although at this point the location pointer 
would be at an even address, that could change if you added another byte value before 
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line 22. It's good practice to add an EVEN directive a-fter using one or more BYTE or 
TEXT directives in your program. The reason -For needing to be sure that we're at an 
even address at this point in the program is due to the use o-f the DATA* directive in 
line 26. Remember that the BYTE directive places one byte o-f data in the program while 
DATA places one word or two bytes in the program. When the assembler encounters the 
DATA directive in the source code, it will increment the location pointer to an even 
address if it should happen to be at an odd location. So... i-F at line 24 the 
location pointer were at an odd address the result would be a one byte "hole' in the 
object code between lines 25 and 26. This would result in a PAB that would not con-form 
to the strict format that must be followed. 

Lines 24-33 contain data that will make up the PAB. Notice that another well defined 

expression is used for the name length in line 31. Doing this allows you to change the 
filename in line 32 without having to change the filename length byte, as long as you 
do not place anything between the end of the filename and the label ENDAT in line 33. 
If your printer is connected to the system through a device other than PIO, you'll have 
to change the filename. ENDAT is equated to the current location pointer through the 
use of the dollar sign. The assembler recognizes the dollar sign to mean the current 
value of the location pointer. Actually, ENDAT and GRMSAV have the same value so we 
could have used GRMSAV in line 31 and done away with the label ENDAT. However, I think 
it's a good idea to keep related sections of code together. If GRMSAV had been used in 
place of ENDAT, the name length byte would get screwed up if any code was added before 
GRMSAV while writing the program. You'll notice that I've used empty comment lines to 
keep the code in modular form. 

Line 35 contains another EVEN directive to ensure that the following code begins on an 
even address, regardless of the length of the PAB data. 

Line 36 reserves 2 bytes in the object code to be used to save the GROM address pointer. 

Line 38 is where the program will start to execute. Lines 38-41 save the GROM address. 
This must be done because some devices alter the GROM address when accessed. In order 
to return to the E/A module the GROM address must be the same when we leave our program 
as it was when the program was entered. The code for saving the GROM address came 
directly from pages 270 and 271 in the E/A manual. 

Line 43 sets the workspace register to >8300. 

Lines 44-49 set up the PAB in VDP RAM and open the file. Again, an expression is used in 
line 46 to calculate the number of bytes contained in the PAB data. 

Lines 51-81 comprise the main program loop. Actually this section is made up of three 
nested loops. The inner loop (lines 56-58) scans the keyboard for a new kwypress. The 
middle loop (lines 54-69) evaluates the keypress and takes necessary action depending 
on what key was pressed. It also places the cursor on the screen. This loop is 
executed once for each new keypress. Lines 66-73 keep up with the character count and 
make sure the 80 character limit is not exceeded. If the 80th character is entered, 
control is passed directly to the inner loop after the character is displayed on the 
screen. This prevents the cursor from overwriting the last character. The main, or 
outer loop, clears the screen and character counter and sets RO to the starting screen 
location. You have probably noticed that I have chosen to use the area of VDP RAM that 
represents screen data for the output buffer. Since the data that we're writing to the 
printer is already stored on the screen, there's no need to move it to another area of 
VDP RAM before sending it to the printer. You can also use the screen data area as an * 
input buffer when reading data if you need to display the data after reading it. The 
main loop also contains the routine used to send data to the printer. Lines 75-81 take 
care of this chore by placing the character count in the PAB, indicating a WRITE 
operation, and calling the subroutine 10 to actually access the printer^ 

Lines 83-91 are executed when the break (FCTN 4) key is pressed. This routine closes the 
file, restores the GROM address, and returns control to the GPL interpreter after 
setting the workspace pointer to the GPL register area. This method of returning from 
the program is a modified version of the one on page 442 in the E/A manual. The manual 
suggests to clear the GPL status byte and then branch to location >0070. I prefer to 
branch to location .>006A since the code there clears the GPL status byte. This saves a 
little memory usage in your program. Beginning on page 440 of the E/A manual are 
descriptions of several ways of returning to the system when your program ends. 

Lines 96-103 are a subroutine to clear the screen. This subroutine uses'the E/A provided 
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VSBW routine to clear the -first byte o-f screen memory and then accesses the VDP chip 
directly to clear the rest of the screen. I used the VSBW routine as an easy way to 
set up the VDP Write Address register. 
Lines ilO-169 make up the I/O subroutine. This subroutine assumes that the PAB is already 
set up with the exception o-f the I/O opcode. The I/O opcode must be passed to the 
subroutine in the MSB o-f Rl. The I/O opcode is written to the PAB, the >8356 pointer 
is set up to satis-fy the requirements of the DSRLNK routine, and then the device is 
accessed via DSRLNK. If access is successful, the subroutine returns to the calling 
program. If an error occurs, an error message is printed and the program returns to 
the E/A module after you press the ENTER key. If an error occurs during a CLOSE 
operation, it is ignored. For an error during any other operation, the error code is 
transfered to the right byte of RO and then multiplied by 2. The multiplication is 
accomplished by shifting the value left by one bit. The resulting value is stored in 
R3, the screen is cleared and RO is loaded with the screen address for the error 
message. In line 126 the indexed addressing mode is used to load Rl with the address 
of the correct error message to be printed. Since each address in the table at ERRTAB 
is 2 bytes long it is necessary to multiply the original error code by 2. This was 
done in line 122. The address of ERRTAB plus the value in R3 is loaded into Rl. Now 
Rl will point to the length byte preceeding the error message. This length is 
transfered into the left byte of R2 via workspace register indirect auto-incermenting 
addressing, and then R2 is made into a word value with the shift instruction in line 
128. The result of all this is that RO has the screen address, Rl points to the 
message to print, and R2 contains a byte count of the message. The VMBW routine is 
used to print the message on the screen. After the error message is printed, the 
"Press <ENTER> to end." message is printed on the last screen line and the program 
waits for the enter key to be pressed. After the enter key is detected control passes 
to the code at ENDIT where the file is closed and the program returns to the E/A 
module. Lines 144-151 are a table of addresses pointing to the error messages. All 
the entries in this table could have been entered on one line in the source code, I put 
them on separate lines so it would look more like a table. The error messages that 
follow are taken more or less from the error code meanings listed on page 299 of the 
E/A manual . 

Line 170 contains the END directive that tells the assembler that it has reached the end 
of the source code. 

Well, there you have it. Remember that it is net necessary for your version of the 
prograrr. to operate in exactly the same manner as mine. If it works, it's OK. 

The A/L Challenge for next month sort of expands on what we We learned this month. 
Write a program that will allow you to enter letters from the keyboard onto the screen at 
any location. In other words, the keyscan routine will have to recognize the arrow keys 
in order to move the cursor around on the screen. . You should also try for a blinking 
cursor and repeating keys. The keyscan routine should also check for FCTN 3 to clear the 
screen, FCTN 4 to end the prograrh and FCTN 6 to save the entire screen to a specified 
device. When FCTN 6 is pressed, save a couple of screen lines to a buffer, clear them, 
and prompt for an output device. After the output device is specified, restore the prompt 
lines and output the entire screen to the device. After the screen is output, return to 
the keyboard input routine with the screen still intact. Since this program will allow 
you to save a screen to disk, let's also include a routine to recall a screen. Start the 
program off with a menu to select -'design a screen' or 'recall a screen'. Your screen 
design keyscan routine should return to this menu when FCTN 4 is pressed. The format used 
to save the data is up to you. If you have questions, feel free to call 764-7881 after 6 
PM. Out of town folks can write Rt. 9, Box 460, Florence, AL 35630. Please include an 
SASE for reply. 

Until next time. . . . 

Danny Michael 
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Assembly Routine Restart after QUIT 
by Joseph H. Spiegel 



There are several Extended BASIC programs now that use assembly language 
routines. The loader for these routines is quite slow. For that reason, 
it is somewhat annoying if you have to leave Extended BASIC for some 
reason / then return and wait for your routines to reload. The worst part 
is thatf in many cases, the program still resides untouched in expansion 
memory. What has happened is that the low memory has had to be 
reinitialized and the REF/DEF table cannot be found. The following 
program will read a current REF/DEF table and create the proper CALL 
load's to restore it if you must leave Extended Basic. It will also 
perform minimal checking to see if the program you want is still intact. 

The program is used as follows (assuming you have saved the program on dis> 

(1) From Command mode, do a CALL INIT :: CALL LOAD( "DSKl. object file") 

(2) Type RUN "DSKl.REFRESTORE" (or whatever you saved the program as) 

(3) Answer the prompt with the complete filename that you you wish the 
merged file to be saved as. 

(4) The program will recreate the REF/DEF table in merged form and print 
the program names as it goes. 

(5) You will be prompted to enter the program name for checking upon 
reload. Enter one of the names from the program list. Depending 
upon the location of the program in memory, a check of the program 
may be included in he merge file. This check consists of a 
comparison of four bytes at the start of the chosen program. 

If the four bytes are OK, the variable FLAG will be set to 1, 
otherwise ti will be 0. If the REFRESTORE program has 
overwritten the object file, you will be given the location of 
the entry point, and the program will complete the 
merge file without the check. 

(6) After completion, the merge file may be merged into your 
Extended BASIC object loader program 



The program is below: 

5 Iby J. H. Spiegel 6/85 TI6240 

10 PRINT :: INPUT "MERGE OUTPUT FILE NAME? ":OUTFILE$ 
20 OPEN #1:0UTFILE$, DISPLAY, VARIABLE 163 
30 CALL PEEK(8194,A,B,C,D) 

40 PRINT #1:CHR$(0)&CHR$(1)&CHR$(157)&CHR$(200)&CHR$(4)&"INIT"& 

CHR$ ( 130 ) &CHR$ ( 157 ) &CHR$ ( 200 ) &CHR$ ( 5 ) & "CLEAR" &CHR$ ( ) 

50 PRINT #1:CHR$(0)&CHR$(2)&CHR$(157)&CHR$(200)&CHR$(4)& 

"LOAD"&CHR$(183)&CHR$(200)&CHR$(4)&"8194"&CHR$(179) ; 

60 PRINT #1:CHR$(200)&CHR$(1-(A>9)-(A>99))&STR$(A)&CHR$(179); 

70 PRINT #1:CHR$(200)&CHR$(1-(B>9)-(B>99))&STR$(B)&CHR$(179); 

80 PRINT #1:CHR$(200)&CHR$(1-(C>9)-(C>99))&STR$(C)&CHR$(179); 

90 PRINT #1:CHR$(200)&CHR$(1-(D>9)-(D>99) )&STR$(D)&CHR$(182)&CHR$(0) 

100 E=256*C+D :: LN=3 

110 FOR X=E TO 16382 STEP 8 

120 CALL PEEK(X,F,G,H,I,J,K,L,M) 

130 PRG$=CHR$(F)&CHR$(G)&CHR$(H)&CHR$(I)&CHR$( J)&CHR$(K) : : PRINT PRG$, 
140 PRINT #1 : CHR$ ( ) &CHR$ ( LN ) &CHR$ ( 157 ) &CHR$ ( 200 ) &CHR$ ( 4 ) &"LOAD".& 



CHR$ ( 183 ) &CHR$ ( 200 ) &CHR$ ( 5 ) &STR$ (X) &CHR$ (179 ) ; 

150 PRINT #1:CHR$(200)&CHR$(1-(F>9)-(F>99) )&STR$(F)&CHR$(179) 

&CHR$ ( 200 ) &CHR$ ( 1- (G>9 ) - (G>99 ) ) &STR$ (G) &CHR$ ( 179 ) ; 

160 PRINT . # 1 : CHR$ (200) &CHR$ ( 1- ( H>9 ) - ( H>9 9 ) ) &STR$ ( H ) &CHR$ ( 17 9 ) & 

CHR$ ( 200 ) &CHR$ ( 1- ( I>9 ) - (I>99 ) ) &STR$ ( I ) SiCHR$ ( 179 ) ; 

170 PRINT #1:CHR$(200)&CHR$(1-(J>9)-(J>99) )&STR$(J)&CHR$(179)& 

CHR$(200)&CHR$(1-(K>9)-(K>99))&STR${K)&CHR$(179); 

180 PRINT #1:CHR$(200)&CHR$(1-(L>9)-(L>99))&STR$(L)&CHR$(179)& 

CHR$(200)&CHR$(1-(M>9)-(M>99))&STR$(M)&CHR$(182)&CHR$(0) 

190 LN=LN+1 :: NEXT X 

200 INPUT "PROGRAM TO BE CHECKED UPON STARTUP? ":CK$ :: 

CK$=CKS&RPT$(" ",6-LEN(CK$)):: Y=E 
210 IP Y>16383 THEN PRINT "THAT PROGRAM NOT FOUND" : : GOTO 200 
220 CALL PEEK(Y,F,G,H,I,J,K,L,M) : : PRG$=CHR$ ( F ) &CHR$ ( G ) &CHR$ ( H ) & 
CHR$(I)SiCHR$(J)&CHR$(K) : : LOC=256*L+M 
230 IF L0O32767 THEN LOC=LOC-65536 : ; LOC$=STR$ ( LOG ) 
240 IF CK$=PRG$ THEN 250 ELSE Y=Y+8;: GOTO 210 
250 CALL PEEK(-31952,S1,S2) : : S=256*Sl+S2-65536 
260 IF S<LOC THEN PRINT "PROGRAM OVERWRITTEN BY THIS ROUTINE 

, CHECK LOCATION" ;LOC; "BY HAND!" :: GOTO 330 
270 CALL PEEK(LOC,F,G,H,I) 

280 PRINT #1:CHR$(0)&CHR$(LN)&CHR$(157)&CHR$(200)&CHR$(4)& 
"PEEK"&CHR$ ( 183 ) &CHR$ ( 200 ) &CHR$ ( LEN( LOC$ ) ) &LOC$&CHR$ (179 ) & 
" @ 1 " &CHR$ (179)&"@2" ; 

290 PRINT #1:CHR$(179)&"@3"&CHR$(179)&"@4"&CHR$(182)&CHR$(0) 
300 PRINT #1:CHR$(0)&CHR$(LN+1)&CHR$(132)&"@1"&CHR$(190)& 
CHR$(200)&CHR$(1-(F>9)-(F>99) )&STR$(F)&CHR$(187)&"@2"&CHR$(190) ; 
310 PRINT #1:CHR$(200)&CHR$(1-(G>9)-(G>99) )&STR$(G)&CHR$(187)& 
"@3"&CHR$(190)&CHR$(200)&CHR$(1-(H>9)-(H>99) )&STR$(H)& 
CHR$(187)&"@4"S.CHR$(190) ; 

320 PRINT #1:CHR$(200)&CHR$(1-(I>9)-(I>99) )&STR$(I)& 

CHR$ ( 176 ) &"FLAG"&CHR$ ( 190 ) &CHR$ (200 ) &CHR$ ( 1 ) S."1"&CHR$ ( 129 ) & 

"FLAG" &CHR$ ( 190 ) &CHR$ ( 200 ) &CHR$ ( 1 ) & " " &CHR$ ( ) 

330 PRINT #1:CHR$(255)&CHR$(255) 

340 CLOSE #1 

As an example, I would like to use the popular TK-WRITER program. As 
you go from the EDITOR to FORMATTER or back, the object file reloads. 
In most cases, this is not required. I say in most because, I'm not sure 
if the loader program will be overwritten if the buffer approaches full. 
Using the method mentioned, you can enter: 

CALL INIT :: CALL LOAD ( "DSKl .WRITER" ) 
RUN "DSKl.REFRESTORE" 

Answer the prompt for output file with DSKl.LOADMRG. Choosing EDITOR as 
the check file, you find that the object file had been overwritten by 
the REFRESTORE program. However, the entry point of EDITOR is 
stated to be -1514. That's no problem, it just means a little more work. 
Now do a OLD DSKl. LOAD (assuming that's what the loader is stored 
under. Then do a MERGE DSKl.LOADMRG. If you list the program, you will 
see parts of both routines; don't worry about that for now. Remember 
that entry location, lets find out what's there. In immediate mode, 
type; 
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CALL INIT :: CALL LOAD ( "DSKl. WRITER" ) 
CALL PEEK(-1514,A,B,C,D) : : PRINT A,B,C,D 

The values printed will be 2, 224,248, and 142 if you have the same 
version I have. You now can create the check lines: 

6 CALL PEEK(-1514,ei,@2,@3,@4) 

7 IF @1=2 AND @ 2=2 2 4 AND @ 3=2 4 8 AND @ 4=1 4 2 THEN FLAG=1 ELSE FLAG= 

Modify the rest of the program to do the check, then jump around the 
load if the check is OK and you have the new LOAD program below: 
NOTE; Portions from original program by Tom Knight 

1 CALL INIT :: CALL CLEAR 

2 CALL LOAD(8194,36,244,63,232) 

3 CALL LOAD(16360,85,84,73,76,73,84,250,212) 

4 CALL LOAD(16368,70,79,82,77,65,84,250,132) 

5 CALL LOAD(16376,69,68,73,84,79,82,250,22) 

6 CALL PEEK(-1514,@1,@2,@3,@4) 

7 IF @1=2 AND @ 2=2 2 4 AND @ 3=2 4 8 AND @ 4=1 4 2 THEN FLAG=1 ELSE FLAG=0 
100 IF FLAG THEN 110 

108 CALL LOAD ("DSKl. WRITER") 




reep ycur Ccmputer in Gccd Shape . . . 
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HON TO OMCRT ASSDaV PROGRMS TO PROGRIM FOR FASTER 
LOADING M> LESS DISK SRM£ - »ittcn by Oirrcn Lmird, 
Pittsburgh Users Group, on «n idei by Marty Krolli Jr. 
<Rfprinted froi NortlMest Ohio 99'cr Neifs) 



K you bavf fver loaded «n Assobty progria with 
Editor/AssMbltr Option 13 you My hive notictd that it 
takes quite a while to load. Hith tow programs this can 
take Mr 2 linutes. These types of progras are in 
Display/FiKed M fonat idiich ne are going to change to 
PROGMH foTMt to load with Option 15. In addition to 
loading 3 to 5 tiaes faster, program stored in progr« 
format, i.e., NoMry Image, take as little as 1/4 the disk 
space of D/F 81 files. 

The method outlined in this article mill mork on 95( of 
all Assaibly D/F 88 programs. Prior to writing this, I 
tried it on 21 programs, and it worked on 19 of thai. It 
Mill even alloM you to save an ASSEM3LY progrmi to cassette. 
Thus people with an E/A and 32K can run Assobly pro(rmK! 

To begin with, read page 421 of the Editor/Assabler 
manual. Try your progrma the may they outline it. If you 
get an error, then read on, and I mill explain in detail how 
to get around it. 

This section describes the procedure for D/F 88 files 
TMftT DO NOT Ain'OSTART! H your proy^mi does autostart, read 
down a fcM paragraphs on hoM to roKve it with DISKO. I Ed. 
note • The disk sector editing progrmi DISKO is a Fairmare 
progrma in the DMJ6 Library. 1 

1) Plug in your E/A and call up TIHMSIC. Your E/A 
must be plugged in! 

2) Type GMl INIT 

GALL LQAD('DSKI.FILENMC-) 

3) If your progrmi has more than one file, type in all 
th® remaining files in order as follows: 

OMl LQM>("DSK1.6mEXr) 
CALL LQM)('DSKl.Me2'> 
CMI LQM>(*DSK1.GAHEX3') 
Set the idea? 



4) Type OMl PEEK(8228,A,B) 
PRINT A,B 



5) NcM 2 nuBbers will appear on the screen, one on the 
left and one in the middle of the Kreen. This nm^ 
corresponds to the first free adc^ess in the moMry which is 
also the last address of your progrmi. 



6) Convert this maber to Hex and add AiB to cok up 
with a 4^igit bexadKimal mmter. Since your program is 
normally loaded in wmty itm addresses >A8e8 - >FFD7 if 
you get M8e for A^B then your progrmi has an Absolute 

Origin statement (AORS) and you will not be able to convert 
it with this method. Similarly, if A^B is A788 or wMller, 
then the progrmi is loaded in an imusual manner since it 
canot fit in the sail otm frmi }A888 - A788. But if you 
cone up with A*B « 8888 or greater, then this method will 
work m of the time. 

7) Type "BYE" and ctll op the Editor. Now type in the 
Mil Asscibly progrmi listed here: 

OEF 8FIRST,SIAST,SLQM> 
SFIRST EOU >AB88 
aOM) EQU>AB88 

8LA5T EOU >A788 (the value of A^B) 
END 



NOTE!! PUTTKKXWMEROFA^B IN THE PIMX, WERE 
A788 IS!!!!! 

Hit <FCTN 9> twice and save to disk. 



8) Load the Asseibler. 

For source file enter what you save in step 7. 

For object file type DSK1.GMG(4 or what you want. 

Hit return for the printer output. 

Type 'RC' when it pro^)ts for Assembler directives. 

It will then asseible the progrmi. You shoul(h't get 
any errors. 

9) Now load E/A Option 13. 

Enter your fileoMe DSKI.MHEK] 
DSK1.GANEI2 

Then enter the asssbled filenmK fra DSK1.GAHE)(4 step 



8. 



16) lnitt\ 
■OSKLSAME'. 



E/A diik 12 into drive one and load file 



Hit <ENrER> and type *8MC' for the pro^a n»e. 
FolloN the screen input proipts. 

11) Not hit <FCTN O and call up E/A Option K and type 
OSKl.YOIRFILE andvoila! 
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THE ULTIMATE SAVE 



by Tom Freemdo 

You probably have noticed by now that loading Borory 
image files, whether in Basic, Extended Basic, or EA 15, 
is MUCH faster than loading OIS/FIX 80 files. The reason 
is that program, or aeiiory isage, files are just that - 
being an Maiage' ai the original program in oeiory they 
can be transferred en bloc back to the RAN o^ the 
coppMter. Since TI uses VDP RAW for the transfer there 
• c qpffo Hwitation in the ^itp that can be transferred in 
i|«'T:»ti»ji», but 48 sectors, or about 12K bytes, is 
a lot Bore than one record in a DIS/FIX 80 file 
»iiich is only about 48 bytes in a cotopressed file or 22 
•n v\ uncoopressed one. Each record requires a DSR call 
and a cwvewpnt of the disk drive, so you can see why 
thp?e are nsuch slower. 

This is »#iy you aay want to try to convert your LOAD 
t RUN type files to RUN mmn FILE type files, that is 
EA 15 instead of EA »3. What follows is a rather long 
article that should cover just about all possibilities 
for flaking conversions, ftote that you need the whole 
file, in other words hidden files on protected disks etc 
cannot be converted.' The first thing to do of course is 
inake a backup copy on a fresh disk since the file will be 
easier to find, and you don't want to kss up your 
original do you? 

I have to state here and now that ny sethod oakes 
use of DISkAS5EI«L£R. 1 have also outlined ways of 
converting if you don't have DISkASSENBLER, but it is 
-nuch easier if you do have it. I don't necessarily like 
to toot iTiy own horn, but that's why I wrote it - to sake 
learning and manipulating easier! I did not write it to 
puafcp programs, as soee have alleged - as a aatter of 
f^.ct J have yet to see a complete progra/i that could be 
di£n?Heinbled, reassefnbled elsewhere, and work if it was 
original Iv protected in a sophisticatciJ tanner. 

Hjiough already! 



I refer in the text to the tern VDP utilities. 
These are the ones that are loaded by CALL INIT (or as 
soon as you press 3 LOM) & RUN). They consist of XHLDK, 
KSCAN, VSKi, VKBW, VS6R, VHBR, WTR, D6RUK, LDADEP, and 
6PULM(. Other naoes that lay be REF*d are addresses that 
are resolved by the loader, or DEF*s in other prograis 
and also resolved, so you don't have to worry about thea. 

Here goes*.. 

1) You have the source code 

This one is easy! Just sake sure that there is no 
A0R6 in the >2000 to >4600 range. Now, unless they are 
already there, insert the followingt 
OEF SFIRST,SLAST,SLOAO 

SFIRST 

SLOAD B eSTART 

START, or whatever you have labelled it, is where 
the program actually begins. Also, at the end of the 
file, where you see the EM) directive, put the label 
SLAST at the beginning of the line. Also aake sure that 
the auto-start feature is not activated by the presence 
of the START label after the directive. 

^klw reasseible using the R option if necessary, and 
C for speed of loading. Next proceed on to step 5) 
below. 

2) No source code 

A) With DISkASSBffiLER 

Run DISkASSEKBLER on the DIS/FIX 80 file you wish to 
convert. You will get all the information you need! 
whether the file is absolute ^ relocatable, compressed 
or uncoipressed, the range of addresses used, and the 
naies of all REFs and DEFs, as well as whether there was 
Aixed AGR6 and RCB16 code, or out of order code. In the 
latter two cases there aay be sooe difficulty in changing 

to i^nory ifsage fomat. See NOTE 2 below. 

Note down the first and last addresses. If the file 
is R0R6, add >A000 to each. Note whether there are REFs 
to the ^/DP utilities, in which case see NOTE 1 below. 
And lastly note whether there is an auto start or not. 
In this case, if the file is coepressed, go on to D) 
below. If it is uncoipressed then load it into the TIM 
or EA editor. Scan down to the end where a line begins 
with a Ixxxx or 2xxxx and delete this line. Then resave 
the file (in TIN, use PF, then F DSCx.fi lenaee - in EA, 3 
SAVE, N for DIS/VM? 80? prosit). Now go to 3) 



B) Hithout DISkASSataiR 

Load ^.he DIS/FIX 80 file into the TIN or EA editor. 
You aay get an error eessage 'control diaracters reioved" 
in EA but don't Horry about that just yet. Just press 
enter then 2 EDIT. If you see lots of blank spaces in EA 
or control characters in TIN then the file is cowressed . 
Sose of the nork you do Mill have to be done with a 
sector editor such as Advanced Diagnostics or DISK^ID 
but t4)ile you're here sc^ down to the end of the file 
where you see a : at the beginning of a line. This is 
the end of the file, and is preceded by any external REFs 
and DEFs with readable blocks of 6 characters (spacing 
always pads the naiie to 6). If you see any nanes of VDP 
utilities you will have to prepare a special file covered 
in NOTE 1 below. Note whether SFIRST, SLAST, and SU3AD 
have b»?€n defined here. Exaiine the line above these or 
the one above the : if there were none. If it begins 
with a 1 or a 2 then this is an auto start file and will 
have be .wdified. If the file is uncmipressed delete 
tlin line then resave it (in TW, use PF, then F 
DSK:.'.^nenai!»!? , in PA, 1 <5AVE. M for DIS/VAR 80? pnwpt). 
If th€ f,'i« COiniHGssed qu C3n to C). 

NoN go back to the file if it is uncoapressed and 
return to the first line. You »ii 11 see a followed by 4 
characters v^hich are the ASCII representation of the 
MMii«t)f?r of byte^ of relocatable code in Hex. This is 
followed by an identifier of 8 characters (it nay be 
spaces, or padded to 8 with spaces). In colunns 14-18 
you will see either 9xxxx or A0000. In the first case 
the code is absolute origin at address xxxx. In the 
second it is relocatable and will load at A000. Note 
down the value in either case. If the code is 
relocatable you nay add the hex nuaber that followed the 
at the start of the line to >A000 to obtain the last 
address used. For absolute code scan down the beginning 
of each line. Each should begin with a 9yyyy where yyyy 
is the start address of that line. Nhen you get to the 
last line of code you have alnost the last address. Just 
add to it 2 for each group of 5 characters after the 
9yyyy until you get to a 7F near the end of the line. 
You now have the first and last addresses which will be 
used below. 

C) (kMPressed file -Address Range- No DISkASSEHBLER 
On your backup disk find the first sector (it should 

be 34, or 32 in older HYARC FDC's). Renesber that each 
'V>V« " or record begins on byte 0, 80, or 160 of a 
sector. Ihfi first line should start (in Hex not ASCII) 
d^T:y.r and then 16 characters which are the identifier 
(they are readable in ASCII, as 8 characters), xxxx 
represents the nufuber of bytes of relocatable code. Note 



it down. After the identifier you will see 39yyyy If the 
code is ACK^G or 41yyyy if it is R0R6. Write yyyy down if 
the code is AQR6, or A000 if it is RQRG. If the file is . 
R0R6 you oay add the xxxx found at the start of the line 
to A000 to get the last address. Otherwise scan down 
sector by sector until you get to the last line before 
the REFs and DEFs or auto start, in other words the last 
line beginning with a 39 in Hex. The next line will 
start either with a hex nuiber froi 31 to 36 or with a 3A 
(Hex for :). This is the first address of the last line 
of code. Now add 2 to the yyyy after the 39 for each 
group of 6 characters until you get to the 46 at the end 
of the "line." You now have the last A0R6 address. 
Write down the first and last addresses whether A0R6 or 
R0R6 - they will be used below. Note there are a few 
strange files that apparently were asseaabled witha 
different asseibler froA the one TI supplied us, and each 
line does not begin with an address. In these it will be 
alaoet inpossible to detemine the last address without 
DISkASSEHBLER. 

D) Coipressed file -auto start- No DISkASaffilER 
Nith your sector editor go to the last sector or two 

and find the line that begins (in Hex) 31xxxx or 32xxxx. 
Change the 31 or 32 to 46 and write it to the disk. 

E) Other auto starts 

A few sneaky prograiaers auto start their programs 
not with the above eethod but instead by inserting the 
start address into the user interrupt hook at >83C4. If 
you have a file that auto starts but can't find the 1 or 
2 (in ASCII, 31 or 32 in Wbx) this aay be the aethod. 
Look at the end of the last line of code for the 
following: (coapressed) 39 83 C4 42 xx xx, (uncoapressed) 
983C4BXXXX. If you see it xxxx is the start address. 
Replace the 39 with a 46 if the file is coapressed, or 
the 983C4 with ^000 if it is uncoapressed, and th 
prograa won't auto start anyaore. It aay not start at 
all, but that doesn't aatter because we don't want it 
to! Me just want to load it, then convert it. 

3) The First Executable Instruction 

For the EA 15 loader to work (and all loaders based 
on it) the initial code oust be an executable 
instruction. If you have a file already in aeoory iaage 
foraat you can exaaine the code after the first 6 bytes 
and see Mhat I aean. It frequently is a B Dxxxx (0460 
xxxx is the actual code) or JWP xxxx (10xx) where xxxx is 
the actual start of the prograa. Or It nay be a noraal 
sequence of code e.g. MOV ll,e>xxxx LWPl yyyy etc. 
indicating the prograaner anticipated saving in this 
format. If your file does not begin this way there will 
have to be soae additional preparation. 

If your file is auto start and you have deterained 
it is done by one of the two eethods above then you know 
what the start ^dress is. If the file is not auto start 
you should know froa the instructions for the prograa 
what the naae of the start address is (for RUN after 
LOAD, or CALL LINK in EA Basic) and you can look for it 
at the end of the file (with a sector editor if the file 
is coapressed). You would see soaethxng like SxxxxSTART 
(uncoapressed) or 35xxxx5354415154 (coapressed, reading 
in Hex). These are relocatable start addresses and the 
xxxx should be added to A000. Absolute address have a h 
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or 36 before the xxxx. H you used DISkASSOIBLER the 
star*- address was displayed for you. NW see whether the 
start address is also the first address of the file. If 
it is you are in luck and nay proceed ot to the next 
step. If not you oay still proceed, but when you are 
finished see NOTE 3 because further oodifications are to 
be inade. 

4) SFIRST SLAST file 

If your file already has SFIRST, SLAST, and SLOAD in 
DEFs in it, the prograier anticipated using this toethod 
and you Aay 90 on to step 5), If only one or tuo of 
these names are used check to sake sure that they are the 
first, last, and first addresses respectively. If ' they 
are, then eliainate the appropriate ones froe the file 
belcH. If not use a sector editor to change any letter 
in the naoe (and type 8 over the 7 at the end if the file 
is uncompressed). 

Now prepare the following special file, using the EA 
editor. Lines 2-4 should abut the left aargin. 
DEF SFIRST,SLAST,SLQAO 

SFlKSr EQU >xxxx 
SLOAH EQU >xxxx 
SLASr EQU >yyyy 
Bid 

Here xxxx and yyyy are the first and last addresses 
detPfsiined above. Save the file in DIS/VAR 80 fonwt, 
thnn 90 to the asseiiiler and assefli)le it using the file 
just saved as source file and a different naoe for object 
code. For List File and Options just press enter. You 
nhould rapidly get the 0000 errors oessage. 

5) fhe^Reassanbly, 

^nM tharyou are ail prepared the final job is easy. 
Usmg the 3 LOAD k m option of EA load your file 
(iTicdifiPd if necessary to eliminate the auto start), the 
filp r^f-eparod in 4) if it was needed, and SAVE froa the 
R 'tilitv disk. When thp cursor appears again, press 
ewtRv, type in «V^VE for pny^rsm naae, then follow the 
screen proojpts. For purposes of neatness choose a naae 
for the output file that ends in a 1, since 33 sector 
blocks Hill be created and each successive one will have 
the last character increased by 1. 

The newly created file should run in EA 15. It 
wn't if there were REFs to the VDP utilities, or if the 
actual addresses were inserted in the original source 
ct3de. In this case, see NOTE 1 at the end of the 
article. 

Please note that the file you are converting should 
either be all R0R6 in which case it will load at >A000, 
or it should AORG at >A000 or higher. If it AGRGs in 
the>2C^J0 to >md range and above >A000 you should save 
the two parts separately (create two files in 4) above) 
using a file naae ending in 2 for part above >A000, 
Furthermore the range >2e00 to >2FB0 cannot be used since 
this is where SAVE loads, unless that area is really only 
a PSS type block. In DISkASSEMBLER this would be 
indicated by a series of AORGs without DATA. If you are 
ey.afflining the actual DIS/FIX 80 file in the editor or 
with ; doctor f»ditor you would have to see 39xxxx 
•c- :• in Ifpj.) or 9XKXX (uncoapressed, in ASCII) 

carryifig you past >2FB0 with no 42'5 or B*s in between 



for this to be true. In this case SAVE itse)f would be 
saved, and overwritten when the prograa runs, but that is 
OK because it isn't needed anyaore. Furtheraore the 
prograa can't use the range between >2000 and >2h7b 
because the EA loader and utilities reside here. If the 
prograa appears to do that it was aeant to be loaded by 
soae other loader, such as Nini Heaory, so soaething else 
will have to be done. 

All these probleaa can be fixed ^> if you have the 
SAVE source code since it can be AGR6*d wherever you want 
it, and therefore not interfere with the original 
prograa. If you have 0ISkASSE^OL£R this can be done by 
following the instructions in the ^pendix (naturally I 
would love it if you would buy a copy!) For those that 
don't have it I aa placing the source code in the club 
library. The disk can be purchased for $S.00 - all 
proceeds to the Club, not ae! You then place an AGR6 in 
it that gives you >800 bytes outside the range of the 
prograa to be converted and reasseable it. If the file 
to be converted is to be in tht >2000 range then you oust 
use the hini tleaory cartridge to load it, and an R0R6 
asseabled SA^ can be used. 

NOTE 1 The EA Utilities 

Noraally EA 15 prograos should stand alone since the 
utilities are not loaded in first, as they are with 13 
type files. There is a way around this however. If the 
file had REFs to the VDP utilities you knon this will be 
necessary. If there weren't such PEFs but the- converted 
prograa won't run then perhaps there were uses of the 
actual addresses in the prograa and you can try this 
nethod. 

Prepare a short file as in step 4) using >2S99 as 
XXXX and >2676 as yyyy. Assefnble it then proceed to step 
5) and use a filenaae such as UT1L0 as the output file. 
Find the file on disk with your sector editor, and change 
the first two bytes froa 0000 to FFFF. This is a generic 
file and aay be used with all converted prograas that 
need it - all you have to do is copy it to the disk 
containing the converted prograa and change the- naae to 
one the saae as the others but with the last character 
decreased by I. I prepared DISK^AID in this aannerf the 
converted files are called DISKAID0, DISKAIDl, and 
DISKAID2. 

If your file contained code between >2676 and >4000 
that either didn't interfere with SAVE, or you used a 
aodified SAVE, then you could save it together with the 
VDP utilities. However this is not necessary - you would 
just have two shorter files, and waste 1 or 2 sectors. 

NOTE 2 High and Low Heaorv aix 

If the file to be converted contains code below 
>4000 and above >A000 you need to convert the two parts 
separately, using the relocatable SAVE if necessary. If 
there is a low eea piece AND the utilities are also 
needed then for convenience you aay want to save the 
entire low aea block together even though soae space aay 
be wasted. You aay also do it in 2 separate pieces if 
you wish. In any case change the first 2 bytes of the 
file(s) to FFFF. Also reaeaber that if you have 2 files, 
the second aust have the last character increased by 1 
(and again if there is code above >A000). 



MOTE 3 Specia l File for Executahia Instructic?n 
H youp first file created DID have an executable 
instruction at the beginning, AND you needed the special 
VDP utilities file, then change the latter to have a naae 
™ the program files, and change its first two bytes 
back to 0000. Then you are set. If there Hasn't an 
executable instruction and you do need the VDP file, then 
Chang- bytes 7-10 of the VDP file to 0460xxxx i#)ere xxxx 
15 Mliere your program actually starts. Ycu can do this 

.r'^n^'^*^™^*^^ *^ "^^^ CALL INIT loaded 

at ,>^0<W to >2003 and aren't needed. One last case »#iere 
you dm t have the first executable instruction but don't 
have to aake an extra file is where there was a BSS of at 
least 4 bytes at the start of the file (in other words, 
successive origins in the DIS/FIX 80 file). Then you caii 
repUcn bytes 7-10 of your first progra* file with 0460 

if none of these special cases obtain, then you Hill 
have to prepare this special file. It actually is rathS^ 
easy. Find an unused area of «ieiBory, either in Ion mm 

■^m. Write the following source code: 
5F1RST,SLAST,SI.0AD 



A0R6 >F000 OR WJCREVER YOU HAVE DECIDED IT GOES 

SLOAD 

S'IRST B DXXXX XXXX IS YOUR ACTUAL START ADDf^SS 
SLAST END 

Save this file, then asseaible it, load it, then load 
SAVE, then press enter, type in SAVE, enter and follow 
the screen proapts. Use as your file naoe one with the 
last character one less than your previous first file. 
You will create a tiny 2 sector file which EA will find 
the start address in. Reaeober to use a sector editor to 
change the first 2 bytes fro» 0000 to FFFF. 

MOTE 4 Multiple Files 

H your prograa actually contained aultiple files to 
load before the CALL LINK or the entry of prograa naae, 
the instruction above still apply, but it day be a little 
harder to find the infortation you need. I'll be happy 
to help if I can, but you should be able to do it. 
Reoeiber to load ALL of the files before running SAVE. 

This article wound up a LOT longer than I intended. 

Unfortunately 1 have never been accused of being to 

brief. However I was really trying to cover all 

possibililites. I hope it woHts for you every tiae! 
Enjoy. 



Editor's Note: Tom Freeman is a practicing pediatrician in the Los Angeles 
area and a regular (prolific) contributor to the excellent "LA Times", 
newsletter of the Los Angeles Area 99er Users Group. He is also author of 
the terrific "DISkASSElIBLER" software available from MG (1475 W. Cypress 
Avenue, San Dimas California; $19.95 + $2 S & H) . He is skilled in both 
assembly language language and GPL ("Graphics Programming Language") and 
continues to produce innovative public domain routines as well as his 
commercial efforts - the most notable being his two-column and "quad-column" 
print routines. 
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The C Language and You 
By Warren Agee 
Compuserve ID 70277,2063 

The TI-99/4A is getting to be quite an 0-L-D computer! But despite its 
age, cjuite a bit of software that is commonplace for other machines has 
yet to surface for the 99 enthusiast. One of those goodies is a C compiler 
- the language which is currently the rage the of newest and brightest 
computers in the market today. But the wait is over! In or around 
September 1985 a gifted systems programmer from Ontario, Canada, Clint 
Pulley, filled a deep whole. ..a C compiler for the 994A! 

But what is C? C is a language that was developed by Dennis Ritchie on the 
Unix operating system on the DEC PDP-11. Since then various versions of 
the language have popped up on almost all personal computers. In fact, it 
is the language of choice for the newest breed of personal computers — 
the 68000 machines likethe Amiga and Atari 520ST. C's long list of 
strengths includes the fact that it is not tied to any one operating 
system and machine, which makes C code rather portable. This doesn't mean 
that a program written on a Macintosh will run on an Atari 520ST, but it 
does mean that the process of converting such a program over to a new 
machine is greatly simplified. C is also relatively smsdl, it can be 
learned quickly. It is a relatively "low level" language, which means the 
programmer has more direct control over his work and the machine. However, 
this facet cdso has its drawbacks: the programmer has to be more careful 
in what he does and has to have a good understanding of how the machine 
works. 

C is not a language for beginners, mainly because it is a low-level 
language. But it *is* much easier to learn and use than Assembly, and 
perhaps easier for some than FORTH. The most significant advantage to this 
language is that it allows people without the knowledge or expertise (or 
sanilY??) to program in Assembly can now produce high-quality, fast 
software that in many cases rivals assembly. 

Perhaps I should correct myself and say we now have a "c" compiler, not a 
"C" compiler. What? That's right, a little "c". You see, the compiler 
that Clint wrote, called c99, reaHy suppoi±s only a subset of the full C 
language, often referred to as K&R, which stands for Kernighan and 
Ritchie, the creators of the language. This is due to the memory 
constradnts of the 99/4A. The C language was developed on a mainframe, not 
on a 48K home computer. This means that many compromises had to be made in 
order to squeeze a functioned C compiler into the 4A. Nonetheless, c99 is 
a very capable language that stands by itself just fine. 



The C language is different from BASIC in that it is compiled, which means 
you key-in your programs witii a word processor , then run them through the 
compiler. This program reads in your source code and generates assembly 
language code, which is the finished program, which can be loaded in 
separately and run. The mechanics of creating a program with c99 differ 
from most compilers on other machines in that the c99 compiler does not 
generate the finished program. It's really a two-step process. The 
compiler generates assembler source code instead of object code. The 
resultant file is then run through the 99/4A assembler, which comes with 
the Editor Assembler cartridge. So as you can well imagine, you need the 
E/A cartridge in order to program in c991 However, a thorough knowledge of 
assembly language is in no way a prerequisite to programming in C. But 
one does have to know how to work the assembler, which is not hard at all. 

But what is aH the fuss over the C language? Who cares if it's compiled? 
I care. A lot of people care. So stop asking questions and listen. The 
singlemost important advantage of a compiled language (like C) is 
»»>SPEED««<. Zooooom. ..the only thing faster than a c99 program is an 
assembly language program. Not even FORTH can beat it. C is also much 
easier to learn than assembly. It is easier to read than assembly. Its 
easier to go back and modify after time than assembly. So let's aU pitch 
assembly out the window! No, we must not do that, because there is one 
major drawback of c99...it tends to create "bulky" programs. If one were 
to write a program that prints mailing labels in both languages and 
compare, you woxild find that it probably took less time to write it in 
c99. It probably also compares favorably to assembly in its speed. But 
the size of the programs will be dramatically different. . .assembly is much 
much more compact. This is very important to people like us who only have 
48K of memory with which to work! 

However, in aU honesty, its not that bad. I have been able to write 
functional, effective programs in c99 that just fit into 48K. You may not 
be able to port Lotus 123 or dBASE III, but you can sling some mean code 
if you stay on your toes. Fortunately, some very nice people have made 
that job easier on us, namely Clint Pulley, Tom Wible, and Richard Roseen, 
who have developed "optimizers." These doo-dads compress your program, 
allowing them to fit in a smaller space, therefore making more memory 
available to you. Clint wrote the original c99 optimizer, and Tom and 
Richard continue to enhance it. 

Speaking of enhancements, Clint Pulley seems very dedicated to his 
project. He is constantly updating and upgrading his compiler to bring it 
up to snuff with "the mainstream." Although at the start c99 was more a 
novelty than anything else, Clint has raised the power and versatility of 
c99 to a level of commercial quality. As of this writing, I know of three 
commercial programs soon to be available that sure written in c99, and I 
have no doubt that more is on the way. 

[Editor's Note: Warren is well-qualified to write about c99. He is one of 
the very first to write a commercial program using the language, "Total 
Filer" from Asgard Software, P.O. Box 10306, RockvUIe, MD 20850.] 



c99 Beginner's Tutorial #1 
by Ron Albright 
Ooirpuserve ID 75166,2473 

I have been exploring c99 for the TI of late. Written by Clint Pulley (38 
Townsend Avenue / Burlington, Ontario, Canada L7T 1Y6) and available as 
Eairware, the language is a full-featured version of "small c". I have found 
few limitations with the language (lack of floating-point and math routines are 
the major ones), and have been able to do some nice routines with the language. 
Briefly, C is a very popular programming language through which, it has been 
estimated, 70% of ooninercial software for otl^ machines is written. So what 
makes it different? It is a "ccxtpiled" laiKruage. That means, once you have 
written your program in c99, you run a conpanion program called a ccxipiler. The 
conpiler takes your C source code and generates asseiibly source code. The 
resultant code can then be run through the TI Assembler to generate object 
code, whicdi executes just as fast as if you went through the strenuous (to roe, 
anyway) task of writing assembly source code to start with. C is much easier to 
learn that Asseitibly language and is efficiently compiled with the c99 compiler. 
I have seen some programs written with c99 alone (there are a few on 
Compuserve; a sinple text editor and a word-counter for TI Writer files by 
Warren Agee, a program similar to the TI V^iter formatter, and a graphics deao 
by yours truly) and they are iiKiistinguishable from pure assembly language, 
because the end-product is just that. If there is any interest, I will address 
the language more in depth in some more starter-level tutorials. I am no 
expert, by any stretch of the imagination, but I am learning and plan to spend a 
great deal of time with the language. It is a marvelous programndng tool and, 
hopefully, this sinple file will help you get started. Learning a new language 
is never easy, but it is time we all advanced beyond BASIC and started working 
in another environment. c99 provides a reasonable alternative. I could never 
think in reverse, so I gave up on Forth; I am too dense to learn asserfDly 
language. Pilot is too slow and requires too many disk accesses. Besides C is 
used in so many other madiines and for so many other applications, it has to be 
good. Let's begin by seeing what we have to work with. 

First, equipraent-wise, you need the following: console, monitor, 32K 
memory e3?)ansion, at least one disk drive and controller, the Editor/Assembler 
pacdcage (csortridge or disk version) and, of course, the c99 system disk. A 
printer is nice (see below) but is certainly not iitperative for prograramjig 
purposes. Idecdly, you would have two drives as this makes the work much 
easier, as does having at least double-sided drives (but ain't that always the 
easel). If you have double-sided drives, you can save yourself a lot of disk- 
swapping by, first, of course, making a backi?) of the c99 system disk and, 
secondly, copying from the Bditor/Assenibler disk, the files ASSMl, ASSM2 (the 
files for assembling source code) and EDITl (for the E/A Editor) on to the c99 
system disk. But, if you have a single-drive or single-sided system, don't 
despair... things will work just fine with what you have. 

Once you have gathered your tools, you should get a disk directory 
printout of the c99 system disk. Pulley even provides a disk catalog program on 
the system disk (called "SD" and running out of E/A 5 on my disk) but it 
doesn't print to printer). You will notice that there are a long of files in 
all shapes and "colors" (D/V 80, D/F 80, and PROGRAM files) and we will first 
go over v*iat is iitportant and what is not. Sane of the files you will be using 
a lot, others seldom if at all, at least to start. Here are some of the files 
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you should have and v*iat they are for. I will list them in order of iitportance 
and probably frequency of use. 

C99C,C99D,C99E 

Biese are the ocxnpiler files. Tliey are the heart ai^ soul of the c99 
system. Ihere are PROGRAM image files and are run from Editor/Assembler c^Jtion 
5. Onliloe some PROGRAM image files, these CANNOT be run from option 3 of the TI 
Writer module. In my brief experiment they could not be loaded fran XB with the 
FUN LOADER from Australia. Bie first thing I did with these files is rename 
them to be UTILl, \jril2, OTIL3. Then, v*ien you diose the LOAD and RUN option 
from E/A (option 5), you only have to hit "E^ter" and the files will be 
loaded by that name as a default without typing them in. 

CSUP 

This file is very important. It is a D/F 80 (which always means it runs 
from E/A option 3) which mast be loaded irannediately after you load you 
completed/ assembled program. We will discuss this more later, but suffice it 
to say that your c99 program will never run if you don't load this file after 
it and with it. 

C99MAN1 r C99MAN2 ,C99MAN3 

These are the D/V 80 files that contain the documentation Clint 
Pulley provides with the c99 system. They are not going to go very far in 
teaching you how to program in c99. Like the manual TI provided with the TI 
Ftorth system, they are siitple a brief tutoricd on how the different files work, 
and what they do, what the error messages mean, ect. Tiiey are quite adequate 
for their intended purposes. Pulley tells you up front "iMs manual assumes a 
knowlec^e of standard C or the availability of a suitable reference." lhat 
translates into "If you have never programnned in C, go buy a book!" I will 
recommend a couple at the end of this piece. Far enough, Clint! If you have a 
printer, print these files out for fxiture reference. If not, find a friend who 
does. You will need a hard-copy of these files. 

C99ERRORS 

This is a short DA 80 file that contains a listing of the 30 or so 
error messages that the compiler will embed in your ooitpiled code when it 
encounters one. It will only annbed the error number. You will have to look in 
this file to find out what the niartoer means. Print this out edso. 



C99SPBCS 

A terribly inportant D/V 80 file. Hiis short file tells you what c99 
si?)ports and, more inportantly, what it does not s\aK)ort, when caipared to 
standard C. Why is this inportant? I have yet to find a book that addresses 
only "snail c", the version of C (more limited than "big C") that c99 is 
modeled after. All the texts I am aware of cover the full C language. Sttall c 
and c99 do not have all the functions of C. When you look at program listings 
out of these texts, you will quickly become fnostrated if you try to type 
them in verbatim as they are already. Many program statements in C will 
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give you errors in c99. You have to study this file when typing in program 
listings out of books to avoid these errors. For exarrple^ C su^jports 
"floating-point" arithmetic; small c and c99 do not. There are other examples 
cx)vered in this file; print it out. You will need it. 

(SFIDOCS 

Kiis is the documentation for the graphics routines si:5ported by the 
current version (1.32) of c99. Print it out. 

EE^INDl 

This is a helpful file provided by Clint. It is a PROGRAM file to be 
run out of E/A 5. Run this if you have run the c99 oonpiler on a source code 
file and received the dreaded "! 'ERRORS!!" message. What it will do is prompt 
you for the conpiled file's name (not the original source file!), read it in 
very quickly showing the file on the screen as it reads it. You can stop to 
read the file by holding down any key; releasing the key resumes the read. 
Then, after it has read the file, it will flash the lines again on the screen 
that contain the error message so you can (1) see where the error occurred and 
(2) what the error message was. It is also nifty for reading ANY DA 80 text 
file. It's purpose, though, was to help in debugging. 

Biere are several other files that are, for the most part, files to be 
included in your c99 source codes as you use certain functions. We will go into 
this in some depth later, but you will use an "#include dskl. filename" in your 
source files to copy these files into your source codes. For example, if you 
used some graphics caimands in yoxir source file to draw some sprites or such, 
you would need to use "#include dskl.grflrefs" in your source code as a line 
before you started using the graphics ccxnnnands. Else, the coitpiler vron't 
understand what they mean and give you a multitude of errors. If you use 
commands to access disk files, you would have to use "#include dskl.stdio" (for 
"staiKSard input and output") before you started opening and reading from disk 
files. Notice the use of lower case in these #include statements. The ccxtpiler 
can use lower case, unlike the E/A T^setibler which only accepts upper-case. 
Just keep the list of the other files as they will be used as you start to type 
in programs. 

How does one enter programs with c99? You can do it two ways. You can 
use TI Writer, but always use "PF" to disk rather than "SF" and throw in the "C 
DSKx. filename" syntax to clean all the control diaracters out. Or, preferably, 
you can -use the Editor of Bditor/T^sentoler. Ws won't do a program this tiite, as 
you have enough to do for now. 

What about reocxnmended books? I strongly recommend "C PRIMER Pms" by 
Waite, Prata and Martin (Sam's Publishing, 1984). It is 500 pages and costs 
about $22. It is the "Going Forth" (Brodie) for C. It is easy to read, starts 
at a beginner's level and is chock full of example programs. Some usable with 
out dialect of small c, sane not (at least without some conversions). I wsnt 
though two other books on C before I found this tome. It is the best I have 
seen. If you know C, the bible (but ituch too advanced for me) is "THE C 
PROGRAMMING LANGUAGE" by Kemighan and Ritchie (Prentice-Hall, 1978). I found a 
back issue of Byte magazine also useful. Hie August, 1983 issue is devoted to C 
and contains some very nice articles and tutorials. You can still get a copy of 
this from Byte. 



c99 Beginner's Tutorial #2 
by Ron Albright 
Coirpuserve ID 75166,2473 

Last tine we touched on vAiat c99 is, and vihat files cxxne on the disk and 
what seme of the more inportant ones do. This timer we'll actually do some 
code. As we progress, ws will stress some sort of style in how we enter 
programs. I am no e2?)ert on style (or c99, for that matter), but since c99 is 
so free-form and has no line numbers to follow, it can be very difficult to 
read programs if you don't follow some rules. Biese rules are not universcdly 
agreed upon, but we'll try to develop satie sort of easy to read style of our 
own. I will mate a few assumptions to start. First, I will assxme you have a 
single-drive system with only single-sided capability. Second, I will assume 
that you have a basic understanding of the Editor/Assembler package, i.e. you 
kno^v how to use the Editor, and run programs out of either option 3 or option 
5. I will, further, assume, that you have asseribled at least one source code 
file with E/h. If these assunptions are incorrect, let me know and we'll touch 
on the Bditor/Assatbler more next time. Let's get started. 

Tate a clean disk and copy the following c99 files onto it: 



CSUP D/F 80 12 Sectors 

PRINTF D/F 80 14 Sectors 

OTILl PE«X3RAM 33 Sectors 

UTIL2 PRDCa^ 33 Sectors 

UriL3 PE«DGRAM 29 Sectors 



Next, from the Bditor/Assonnbler disk, copy these files to the same disk: 



ASS^a PROGRAM 33 Sectors 

ASSM2 PROGRAM 20 Sectors 

EDITl PROGRAM 25 Sectors 



If my addition is correct, that gives us 199 sectors on our work disk. Now 
we are ready to proceed. Keep our work disk in the drive and insert the 
Editor/Assembler cartridge. From the menu, load the Editor and go into the Edit 
mode. 



Type in this program. 

/* c99 The smallest c99 program */ 

mainO /* a oonment */ 



/* we aren't going to do anything! */ 

} 

Congratulations! You have just entered your first, valid c99 program. 
Let's look at it. The first line is nothing more than a "REM" statement. 
Instead of REM, c99 recognizes anything enclosed within "/* */" as a comment 
and ignores it vAien conpiling. You can put anything between these ccOTnent 
delimiters, and it will survive conpiling without error. Use then frequently as 



you program. As we mentioned, c99 programs are difficult to read at best and 
REM statements are useful to remind yourself r as well as other reading the 
program, what you had in mind. As shown on the next program line, the can also 
be used on the same line as oonpilable code, so coraftient each step of your code 
for clarity. A routine called "main" is required somewhere in each and every 
c99 program. Typically, it is the first block of code, sets things up, and 
calls the other routine(s) to take over. When the ccitpiler sees "mainO" (or 
anything with the "()" after it - like "firstO", "set\?>()" - it labels this as 
a function; a subroutine in Extended Basic. A string of functions make up a 
program. They are just like you ware using "SOB routine" in XB. It is run when 
its name ("main", "first", "setv?)") is "called". The "main" routine is run 
whether it is called or not (guess that is ^y they call it "main" ) . ) is 
called. More on this later. But, for now, thing of c99 as simply a series of 
"calls" to blocdcs of modular code called functions and a fianction is labeled 
with "nameO". 

Bach function is enclosed with a pair of braces - it starts with an open 
brace ( { ) and ends with a closed brace ( } ) . This tells the compiler where 
this block of code starts and ends. Everything within those braces is part of 
that function. In our first program, the only thing in the main function is a 
"REM" statement, so it will "do" nothing. But it is compilable. A function may 
include a call for another function. Look at this: 

main( ) 

{' 

doitO; 

} 

/* doit doesn't do anything! */ 

doit( ) 
{ 

/* see! Nothing here to do! */ 
} 

This time, main calls up the second function, "doit" which, also, doesn't 
do anything. But you can see how programs are built. Typically (but not 
necessarily) the main function will include all the calls to the functions that 
make up a whole c99 program. Its like having an XB program that is nothing more 
than a series of "QOSUB"s (recdly, a series of "CALL SUB routines). Each 
function call doing its task and returning control bacik to the main, or 
controlling program. Uie good c99 program will break large programs into 
smaller ones aiKl write a function for each. If a function can stand alone (has 
nothing in it unique to a single program) the programtner eventually develops a 
"toolbox" of useful small routines (functions) that can be combined in 
different ways to solve problems. Uiat is just one of the beauties of c99. 

So, let's coitpile this program. After typing it in, hit FCTN 9 twice, get 
the EDITOR menu and elect to save it to disk. Your main work disk should have 
plenty of roan, so no disk swapping. After savii^ to disk 1, hit PCTN 9 again, 
and get the main E/A menu. Chose Option 5 to "RUN PROGRAM FILE". Hie three 
conpiler files, which I have renamed UTILl, UTIL2, UTIL3, run out of c^on 5, 
not option 3 (which runs D/P80 files). When you are prcxnpted for "Program 
Name:", since you have changed the name of your ocwpiler files to uriLl-3, you 



only have to hit enter. The default name for E/A 5 is OTILl and those files 
will then be loaded automatically (new you see why I renamed them) . You will 
then be pronpted by the c99 conpiler (proirpts will vary depending on which 
version of c99 you use) for a input file name. Type "DSKl. filename" ( filename 
being generic for whatever you called the file you typed in and saved to disk) . 
You will then be prompted for an output file name. Cedl it "f ilenaroe/C" , just 
to remind yourself that is a ooirpiled file. Then, hit enter and you are off and 
running. Ihe oonpiler will flash each function name on the screen as it is 
conpiled to show you vAiere you are in the program. You should see only "main" 
if you are compiling the first program, and "main", then "doit" if you are 
ooitpiling the second routine. If an error is encountered, you will be told. But 
we'll assunne you l^ped these short routines in without error for now. It 
shouldn't take long and you are told to press enter to continue after the 
conpiler is finished. 

Now what? If you catalog your disk now, you should see the initial source 
code file you typed in and saved, and now a second file called "f ilename/C" . 
Both should be D/V80. You have one more step to do before you can run the 
program. What the ccxipiler produced was assembly language source code. Like all 
source code, it has to be assotibled. Get to the main E/A menu ai^ choose Option 
2, Assemble. When asked to "Load Assembler?", hit "Y", and since we put the E/A 
assannbler files on disk 1 (ASSMl and ASSM2) they should load right in without 
sw;^ping disks. You are then pronpted for the "Source File Name". Type in 
"DSKl. f ilename/C" (NOT the program you t^ped in and saved, but the conpiler 's 
aitput filename). For an "Output File Name", I use "DSKl. filename/0" to let me 
know this is object code. Then hit enter for each of the next two assembler 
pronpts ("List File Name" and "Options"). Bie assembler should start right i:p 
and finish with the assennbly process. Now, catalog you disk again. You should 
see a third file added now - "filename/0". This time, it is not D/V80, but 
D/F80. Assembly language OBJECT code. You have produced an assembly language 
program. How do you run this "do nothing" program you have written? Go back to 
the main E/A menu again. Choose Option 3 from the menu. When asked for "File 
Name", type in "DSKl. filename/0". Hien hit enter. You get the same prompt again 
("File Name:"), laiis tiite, type "DSKl.C^UP". This "c99 SiJEport" file MUST be 
loaded after you load ANY c99 program. Hit enter. When you get the pronpt for 
the third filename, just hit enter this time. When asked for the "Program 
Name", type in "START". All c99 programs run with the program name start. Your 
do nothing, super-di:per assonbly language program should now "run". You then 
iimediately get the "hit enter to continue" message and you have finished. 

V9ell, how does it feel to have generated a assembly language program just 
lite the "big boys"? Next time, we will do something with a little more 
substance. Vie will create a simple menu, which will demonstrate keyboard ii^t 
and the "printf", "puts", and "getchar" functions. But, for now, I just wanted 
to go through the mechanics of running the c99 system. Till the next tutorial, 
get a C book, read the "manual that comes with c99 itself, send for the new 
version 2.0 of the conpiler, and if you haven't paid Clint do so. 



c99 Beginner's Tutorial #3 
by Ron Albright 
Oonpuserve ID 75166,2473 

When I started to learn BASIC (and later. Extended Basic), I remariber how 
I did it. I first typed in other programs from magaizines and books. Uien I 
started to do my own programs. And the first type of commands I used were the 
grajAiics ocmnands. I sure didn't jiatp in with file handling or string 
manipulation! Anyway, I foui^ myself doing the same thing with c99. I l^ped in 
some programs out of a book, then started playing with my own routines with 
graE*iics. Then I tackled a game. I have though all long that is you can learn 
the logic involved in a game, you have learned a great deal about the 
progranming structure of a particular language. 

In this tutorial, we will try to accomplish a couple of things. First, a 
glimpse at some of the graphics ccxiinsuids available to c99 in the "grflrf " 
library (that comes with all version 1.32 or higher), and, secondly, a look at 
how to convert a short BASIC graphics display to c99. It really isn't that 
hard. 

Listing 1, below, is a short BASIC program from Bd York that has appeared 
in several UG newsletters. It is a colorful grajAiics display. Listing 2 is a 
conversion of the program to c99, done by me. They both acoxtplish the same 
thing graphically. I have commented the c99 source code to try and esqplain step- 
by-step what we did. I think as you look at the programs, you will see how 
similar both the graphics coninands and the logic is between c99 and BASIC. It 
is, to me, much closer to BASIC than Forth v^s. See if you agree. 

Listing 1 

100 REM COLOR BCXmZh 

110 REM WRITTEN BY: 

120 REM ED YORK 

130 CALL CLEAR 

140 FOR A=40 TO 136 STEP 8 

150 CALL CHAR(A,"55AA55AA55AA55AA") 

160 NE3Cr A 

170 FOR &=2 TO 14 

180 CALL OOLOR(B,1,1) 

190 CALL VCHAR(1,2*B,24+8*B,22) 

200 CALL VCHAR(1,2*B+1,24+8*B,22) 

210 NEKT B 

220 FOR 02 TO 14 

230 CALL SCREIEN(IOT(16*RND)+1) 

240 FOR I>=2 TO 14 

250 CALL OOL0R(D,D,C) 

260 NE3Cr D 

270 CALL KE:Y(0,E,F) 

280 IF F<1 TEiEN 270 

290 NEXT C 

300 GOTO 220 



Listing 2 



/* OODCK BONANZA This and the next 2 lines are REM's (line 100) */ 
/* WEHTTEN BY: (110) */ 
/* ED YCBK (120) */ 

♦include dskl.grflrf /* required to use the graphics coninands */ 
iinclude dskl.randoro;c /* required to \ase the randcxn number coninands */ 

nBin( ) 

^ int arb; /* MDST declare ALL variables used in a routine at start */ 
grfl(); /* MOST be used as first oonnand for graphics library use */ 
clearO; /* Same as CALL CLEAR (130) */ 
randomizeO;/* Same as RANDOMIZE in BASIC */ 

for(cP=40;a<=136;a=a+8) /* Lines 140 and 160 ALL IN ONE STATBMEOTl */ 
Chrdef(a,"55aa55aa55aa55aa"); /* CALL CHAR in line 150 */ 

for(b=2;b<=14;b++) /* Another FOR-NEXT loop -lines 170 and 210 in one V 
{ /* Multiple lines in for loops need to be braced */ 

color (b,lrl); /* Same as CALL OOLCH - line 180 V 
vchar(l,2*b,24+8*b,22); /* Just a plain old CALL VCHAR! line 190 */ 
vchar(l,2*b+l,24+8*b,22); /* line 200 */ 
} /* Closed braces after FOR LOOP */ 

funO; /* Gets a little tricky here. Since there was a 

"GOTO" statQtient in line 300, I decided to make 
a new routine starting at where the GOTO directs 
the BASIC program - line 220. That way, I can call 
the second function from itself r in essence, 
creating a "GOTO". See below. Anyway, that is why 
I started a new function called "FUNO". I call it 
from the MainO routine here by just calling the 
name of the routine. Its just like I said GOSUB 
or, in XB, had created a user-defined SUB FUN and, 
here, said CALL SUB FUN. */ 

} 

funO /* Start of a new function */ 

{ /* All functions start with an open brace */ 

int c,d; /* Declare these variables at the start! I ! */ 
for(c=2;c<=14;c++) /* start of another FOR loop-lines 220,290 in one! V 
{ /* multiple lines after a FOR need to be braced! */ 

screen(md(16)+l); /* CALL SCREQil in line 230 */ 

for(d=l;d<=14;df+) /* Start of a nested FOR LOOP - line 240 */ 
color (d,d,c); /* CALL OOLCB in line 250 */ 
getcharO; /* Just waits for a key to be pressed - lines 270,280 */ 
} /* Close that brace for the FOR loop */ 

fun( ) ; /* See that GOTO 220 in the BASIC program? Biis is the 

same thing - it just ke^ calling "funO" which is 
nothing more than the program startiiKf at line 220. 
so, by separating the lines where the GOTO starts 
into a separate routine, we can now call it over and 
every time we would be using the GOTO in Basic. */ 



} /* Close braces for fun( ) routine */ 
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Notes: 



[1] Ccxrpile the program with the Conpiler, You must have version 2.0 of the 
Ccitpiler to use the "FOR" statements. Make sure the DA 80 file "RANDOM; C" and 
"C3RF1RF" is on disk 1. The assemble the output file. Hhen, load the assonbler 
out^xit (Whicdi should be a D/F 80 file), then from E/A option 3 still load the 
file "CSUP" (another D/F 80 file) and "GRFl" a third D/F 80 file. Then hit 
enter and lase the program name "START". It should run. 

[2] The only oonplicated move vgas separating lines 220 through line 300 into 
the sepeurate function "funO". l!his was done because line 300 in the BASIC 
program is a GOTO 220. Since there is not GOTO function in c99, we separate out 
those lines ai^ use recursion in "funO". Recursion siitply means a routine 
cedls itself over and over, just like a GOTO. I hope you can follow this. 

[3] Vfe could have used a function similar to CALL FE^{0,EfF) as in line 270. 
Butr by using "getcharO" we accoitplish the same thing in one line. Getchar 
waits for a keypress automatically without testing for "status". 

[4] FCai-NEXT loops in c99 are three parts. Just as 

240 FOR D=2 TO 14 
250 CALL OOLOR(D,D,C) 
260 NEXT D 

accoitplishes three things (set Ty=2, then CALL COLOR(D^DrC) , then incretent D by 
one, then loop)/ the FOR loop in c99 does it all on one line. We say 

for(d=l;d<=14;d-H-); 

d is set to a, then tested to see if it is less than or equal to 14. The 
color(drdfC) is executed as log as d<=14. As each colorO function is executed, 
d is incremented by one by the "d-H-" statement. All things are done with one 
statement. Also remotriber that is there are multiple commands after a FOR 
statement in c99, they mast be set off between a psdr of braces. If a single 
statatientr as we have here, they can be used without the braces. 

[5] If you don't have version 2.0 of the Ccnpiler ai^, thus, can't use "FOR" 
lo(^, you can try this: use a "whileO" function. For exanple, instead of 

for(d=l;d<=14;d++) 
color (d,d,c); 

use this: 

cNl; /* Step 

while(d<=14) /* Step 
{ 

color (d,d,c); 
d++; /* Step 

} 



1 in a loop: set dFl */ 

2 : test for d<=14 */ 

3 : increment d 1 */ 



It will acconplish the same thing. This is only needed if you have version 1.32 
on NOT version 2.0. 



c99 Tutorial 1 
by Warren Agee 
Compuserve ID 70277,2063 



This is my *first* utility word for C. I am NOT an experienced C 
prograiiiner...I have had 2 days experience with C. So, this may not be the best 
way to do it, but it DOES workl ! 

Biis file contains the C source code for the definition of a new function, 
segO, aiid a test program to demonstrate its use. segO corresponds roughly to 
SBS$ in BASIC, It will take a churik of one string and place it in another 
string variable. Both strings must be variables. You provide the variable which 
contains the string to take apart, the variable \^re you want the new string, 
and the starting and ending positions of where you want the chunk taken out. If 
strl contains "APPLE PIE" and you wanted str2 to contain "APPLE", siirply use: 
seg(strl,str2,0,4). Everything starts with zero, not one. So the first 
character is 0, the second is one, etc. segO returns the new chunk in str2. 
str2 should be an "enpty" variable. iMs may not make sense yet, but I have 
conniented this listing thoroughly. 

Run the ccxtpiler on this program, then assemble it, then run it (option 3 
of E/A). Load the assembled program first, then the CSUP file which resides on 
the c99 disk. Program naite is then START. Not exciting, BUT IT WDRKSl I 

/* C TEST PROGRAM V 

/* Warren Agee 10/26/85 */ 

/* written with c99, by */ 

/* Clint Pulley */ 

/* 38 Townsend Ave. */ 

/* Burlington, Ontario V 

/* Canada L7T 1Y6 V 

/* Freeware: $20 donation requested */ 

/* Test of the segO function */ 

#incl\ade dskl.conio 

int pl,p2,c; /* integers */ 

<Aar strl[811,str2[81]; /* strings, 81 chars long */ 



mainO 



pl=0; p2=4; 



c=putcaiar(12); 
locate(3,l); 

puts ("Please enter string:Vi"); 
o=gets(strl); 
seg(strl,str2,pl,p2) ; 
puts("The new string is:\n\n"); 
puts(str2); 



/* take a segment of the string */ 
/* from position to position 4 */ 
/* clear screen */ 



/* ii^t string into strl */ 
/* NEW FONCnOJl V 

/* str2 holds the new, segmented string */ 
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/* 
/* 
/* 
/* 
/* 
/* 
/* 
/* 



Function to segment a string (SBG$ in BASIC) 

seg ( strl , str 2 , charl , char2 ) 

strl=string to tate apart 

str2=segment of strl that is returned 

pi, 2 - beggining & ending position of string 

positi<»:is start at zero! 1 ! 

after call segO, the new string is ocmtained 

in str2; the original string is not sdtered. 



V 
V 
V 
V 
V 
*/ 
*/ 
*/ 



seg ( str 1 , str 2 , pi , p2 ) 
int plrp2; 

char strll81],str2[81]; 



{ 



int index, lim; 

inde^; 

lini=^2-pl; 



/* st£ui: of function */ 

/* tells the oonpiler v*iat pl,p2,strl,str2 are */ 
/* these were DEFINED in the main program, but */ 
/* you have to raxiARE them ag2dn, here. */ 

/* Biese are variables internal to the function; */ 
/* Kiey do not relate to anything outside of this */ 
/* function, ie. they are not global. */ 



\*u.le( index <= lim) 



str2[index++]=strl[pl-H-] ; 



str?r-H-ijidex]=NOIjL; 




Seme Easy Learninn 

••C** Tuterials by Warren Aaee 

and mere. 
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Su?3pose that we to pass one or more values to a function. Look at 

this: 

add(nl/n2) 
int nlrn2; 

{ 

int sum; 

suitF=nl+n2; 

retum(sum); 

} 

The first line tells the compiler to expect 2 values in the parenthesis 
when this function is called. Vfe give these two values the names nl and n2, 
When one calls this function, two numbers may appear in parentheses [like 
add(l,2)] or two variables [like addCa^b)]. The next line is a variable 
declaration, v*iich was described in the first tutorial, but the purpose here is 
a little different. Hie function addO receives two values; now the conpiler 
has to know what KIND (class) of values they are. Since we cure passing numbers, 
we declare them as integers, also notice that this must come *before* the 
opening brace. We then declare another variable, sum, to hold the sum of the 
two integers. We perform the addition just as one would do in BASIC. Bie next 
line is very iitportant. 

When this function is called, we give it two numbers, and we want back the 
sum, right? Since the variable "siam" is local to addO, once we return to the 
calling program, the value of sum is lost. "Sum" only exists in addO and 
nowhere else. What we have to do is artificially send the value of "sum" back 
to the calling program, and we do this with the return statement, as shown 
above. Now, when we call addO, we will get back the value of sum, like this: 

mainO 
{ 

int c; 
o=add(5,2); 

} 

Ttie esqpression "add(5,2)" is replaced by the answer, and we assign that 
value to c. If we just wrote "add(5,2)" and did not assign it to anything, the 
sum would just be discarded. 

But why do all this? We could just declare "sum" as an external variable 
in mednO. That way "sun" would retain it's value throughout tbe entire 
program. In very large programs, you can run into difficulties if you use only 
external variables. Stick to local (automatic) variables whenever possible. 

Wtell, there you have itl Hiere is a lot more to cover as far as functions 
go. The return statement only returns CXfE value, no more. If you r^ed more than 
one value back from the function, you have to use pointers. Pointers can be 
quite sticil^ and confusing to beginners, so I will be spending quite some time 
on tten in the next few tutoricds. So stay tuned, and experiment! It's the only 
way to learn! (Well, reading my tutorials may help a bit! ) 
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c99 Tutorial 2 
"How To Function Properly" 

By Warren Agee 
Catpuserve ID 70277,2063 

m my first tutorial, I covered storage classes, something necessary to know 
before you even start progranming in C, Functions are another basic concept 
which must be grasped before writing C programs. Simply put, a function is a 
subroutine designed to perform a specified task. In some cases, values are 
passed to and from functions, while other functions require no communication. 
Ncnerous functions are part of the staiKSard C library, lite gets( ) and puts( ) , 
which allows input and output of strings, respectively. Others, lite fopenO, 
are tept in function libraries and stored on disk. And,of course, you may write 
your own functions. Indeed, the process of writing a C program involves writing 
user-defined functions, then putting all these functions together into a 
runnable program. 

So, where do we begin? First of all, naming conventions. Although a function 
may have a name of any length, the c99 compiler only recognizes the first six 
characters, and they may be only alpdiabetic. Onlite most other compilers, the 
underscore (_) is not allowed. Secondly, what distinguishes a function name 
from a variable is the presence of parentheses. Depending on the purpose of the 
function, the parentheses may be enpty, lite getcharO. If the function 
requires values to be passed to it, these are placed inside the parentheses, as 
in puts("\nHello there!") . Now that the cosmetics are out of the way, let's 
get down to creating a function. 

As I mentioned in the last tutorial, to call a function, merely type in its 
naite, followed by a sanicolon. Tb alert the cocipiler that you are creating a 
function, omit the somcolon. 

clrO 

{ 

int c; 

putchar(12); 

} 

Here we define function called clrO. Note the missing semicolon. Also 
note that since the parentheses are enpty, we are not going to oomnnunicate any 
values to the function. Next ws have an opening brace, which signals the 
beginning of the f motion body. Note that the brace aligns with the first 
letter in the function name above; this is a standard C convention to mate 
prograns easier to read. Then we indent a few spaces, another convention. We 
then define the integer variable "c." Because this statement occurs inside the 
function body, it is local to that function (See Tutorial #1 for more info). 
The next statement is a standsurd console i/o function which prints a character 
to the screen whose ASCII value is in parentheses. In this case, putchar(12) 
sinply clears the screen. We then find a closing brace which ends the function. 
Notice that the t^ao braces line up. 
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c99 Tutorial 3 
"How To Create a Function Library in c99" 
By Warren Agee 
Cotpuserve ID 70277,2063 

Function libraries are siitply collections of tested functions (or 
subroutines) vAiich reside in separate files fron the main program. This helps 
the prograniter to avoid reinventing the wheel each tiire he writes a program. 
There are basically two code. The difference is that with source code the 
ocnpiler has to process the code every single time you coitpiler while an object- 
code library is only compiled once. 

Creating a function library using source code is the eeisiest of the t}fK> 
methods. Say you create a function strlenO which returns the length of a 
string. You could just t^pe in the function's definition each time you r^ed it, 
but a siitpler way is to save the source code for the function in a separate 
file. If the strlen function is ever needed in a program, merely insert the 
following line at the start of your code: 

#include "dskn.xxxx" 

where n is the drive no. of \*iere the file sits, and xxxx is the name of the 
file which contains the source code. Hhe compiler will load in and ccxipile the 
source code as if it were typed directly into the main program. Hie #include 
command works just like .IF (include file) of TI WEIITER. 

Creating a function library using object code is a bit more involved. You 
start out the same as before, with the source code of the function in question 
as a separate file. But, as in the case with strlen( ) , you cdso need the 
following three lines at the beginning of the file: 

#asm 

DEF STOLEN 
#endasm 

The actual definition for strlenO would follow these lines. The first 
line tells the conpiler that the following code is not in C but in assenbler. 
The second line tells the conputer to make the STEILEN code available to another 
program. Even though it is defined in this program, a totally separate program 
(main) will also have access to it. Note 1) the leading space before DEF (that 
is inportant) and 2) the function name is in capital letters. Bie third line 
tells the ocxrpiler that the assembler code ends aiK3 C code begins again. 

The DEF directive can be used to externally define many, many functions at 
once; just separate each function name with a ccraona. 



Now oonpile and assen^ble your "mini-file" vAiich contains just one 
function. You now have a standalone function library consisting of the 
strlen( ) function that can be used in ANY program. But how do you go about 
liiiking it to your main program? 

The next thing to do is add three more lines to the start of your main 
program: 

#asm 

REF STRLEN 
fendasm 

looks familiar! But instead of defining an external function^ we are 
REFferencing one. Ihis tells the computer that e\7en though the main program will 
use the function STRLEN, it mast look OUTSIDE the current program for its 
definition. Please note that you can REEterenoe more than one function as with 
the DEP directive. If you look at the STOIO file on the c99 disk, you'll note 
that it oont2dns mostly REF'sI 

When your program is caipiled and assembled, be sure to load in the STBim 
file that you already ccxtpiled before you run your program. Under E/A option 3, 
first load your main program, then CSUP, then any other required files, then 
your STRLEN file. Now you're all set to go! 

The theory behind this is not that hard to grasp: instead of including the 
definition of strlenO within the main program, we coitpiled it separately as a 
standalone module. But without the REPs and DEFs, there would be no 
cortinunication between the program module and the strlenO module. This 
mDitentary slip into assencibly language allows us the opportunity to open a line 
of coraraunication between sepsurately compiled modules. 



c99 Source Code - Tutorial 4 
by Warren Agee 
Coitpuserve ID 70277^2063 

/* NEW FUNCTIONS: getintO and stoiO */ 

/* "Rie following is a short demo program */ 

/* demonstrating the use of getintO to */ 

/* directly input an integer, and stoiO */ 

/* vAiich converts a String TO Integer, */ 

/* similar to atoiO; stoi returns a */ 

/* status flag, \Aiich atoiO does not. */ 

/* Various version of both functions */ 

/* exist in the public danain, these */ 

/* have been adapted for c99 by Warren */ 

/* Agee. V 

/* To run: Ccirpile the entire file, making */ 

/* sure CX}NV;C is in drive one. V 

/* When done conpiling & assembling. Load */ 

/* & Run first the object code of this file */ 

/* and then the CSUP file. Program name: STACT */ 

/* The demo routine may be deleted and */ 

/* getint & stoi */ 

/* can be saved as a function library. Dont */ 
/* delete the #defines. . .they are needed V 
/* in both functions. */ 

/* getintO d&oo */ 

♦include dskl.conv;c 
♦define STOP -1 
♦define NO 1 
♦define YES 
♦define EOF -1 
mainO 
{ 

int num,stat; 
char string[81]; 

puts ("This reads in integers until it detects\n"); 
puts ("a CTRL-Z.\n"); 
v*iile( (stat=getint(&num) ) I=STOP) 
if(stat=YES) { 

itod(num, string, 5 ) ; 

puts (string) ; 

puts(" is the nuntiber accepted.\n" ) ; 

} 

else 

putsCThat was no integer. . .try again! 
puts ("We 're finishedlVi") ; 

} 



/* getintO V 
/* fornat: status=getint(&num) */ 
/* status oontcdns: */ 
/* -1 : EOF was f o\md V 
/* 1 : error (no #s) */ 
/* : sucxjessful input */ 

getint(ptrint) 
int *ptrint; 
{ 

ciiar buffer [81]; 
int index, ch; 
index»0; 

vghile((ch=getchar())='Vi'|ch=' ') 

• /* do-nothing */ 
while(chl=BOF & ch!='\n' & ch!=' • & index<81) 

{ 

buffer [ index-H- ]=ch 7 

ch=getchar(); 

} 

buffer [ index ]=0 ; 
if(cl¥==BOF) 

retum(STOP); 
else 

retum(stoi(buffer,ptrint) ) ; 

/* stoi( string, intptr) - */ 

/* converts string to integer (intptr) */ 

/* and returns status report. */ 

stoi ( string , intptr ) 
char string[]; 
int *intptr; 
{ 

int sign; sign=l; 
int index; index=0; 

if (string[index]='-' |string[index]=='+' ) { 

if (string[index-H-]='-' ) 

signp -1; 
else 

signF 1; 

} 

*i ntptr= 0; 

while(string[index]>=»0' & string[index]<='9' ) 
*int?rt:r=10* ( *intptr )+string[ index++]- • • ; 

if ( string! index ]==0 ) 
{ 

*intptr=sign* ( *intptr ) ; 
retum(YES); 
} 

else 

retum(NO) ; 



c99 Sourcjeoode - Tutorial 5 
by Warren Agee 
Coitpuserve ID 70277,2063 

/* DRIVER for string routines */ 

/* This program expects the conv;c file fran the c99 disk 
/* and the STEm«3.C file in drive 2. 
/* Kie SraiNG.C file should be renamed "string" as per 
/* the #include directives belcw, 

tinclude ds}c2.oonv;c 
#incli2de dsk2. string 
char bigstrina[80]rsmallstring[80]; 
char ansv^r[3j; 
nainO 
{ 

int c^a; 

puts("Siiiple test of match and strlen\n\n" ) ; 
puts ( "Remember that all #s start at\n"); 
puts("Zerol!Vi\ii"); 
piits( "Enter large (target) string:"); 
c=gets (bigstring ) ; 

puts("\p\nEnter small (search) string:"); 
c=gets ( smsdlstring ) ; 

a=strlen( bigstring) ; 
itod(a, answer, 3) ; 

puts("\nLength of first string is:"); 
puts (answer) ; 
a=str len ( smallstring ) ; 
itod(a,ansv^r,3) ; 

puts("\pLength of second string is:"); 
puts(answer) ; 

a^ncatch ( snallstr ing , bigstring ) ; 
itod(a, answer, 3) ; 
puts("\n\nThe mtch occurs at"); 
pits ("character #:"); 
puts (answer); 

} 



c99 Tutorial 6 
"Pointers" - Part I 
By Warren T^ee 
Conpuserve ID 70277^2063 

Of all the aispects of the C laiKpiage, pointers are the hardest for the 
beginner to grasp. However, oncse mastered, one will find that pointers are v*iat 
makes C a pc^rful language. 

Siinply put/ a pointer is an address, or memory location. When one declares 
a variable (lite int c; ), that variable resides somewhere in memory. A pointer 
to the variable "c" is the address iighere "c" lives. Biis is advantageous if we 
ymnt to diange a variable that is local to another function. Using pointers 
gives las a way to get through the barrier of being local to another function. 
Think of it as going through the basement to get the contents of a variable. So 
how do we do this? 

int c; 
int *ptr; 

The first line just declares a normal int variable. The second line 
declares a *pointer* variable named "ptr." Pointer variables are preceeded with 
an asterisk. Now, the first line tells the coirpiler that we have an integer- 
type variable, and it's name is "c." The second line says that, first of all, 
we have a pointer variable. Its name is "ptr." In addition, ptr is going to 
point to an integer-type variable— that's what the purpose of the int in the 
second line. Right now, ptr does not point to anything at all. We have merely 
created a variable, and have told the ccxtpiler what kind of variable it will 
point to. Similarly, ciiar *goose; declares a pointer variable called goose 
which will point to a char-type variable. Ihihk of it this way: a pointer 
variable's purpose is to "look" at other variables. But you have to tell it 
what it is looking at... an integer or a char-t^pe variable. 

Itow, if we want ptr to point to "c", we do this: 

ptr=&c; 

Notice that the asterisk is gone. The asterisk has two purposes, one of 
which is to DECLARE a pointer variable. The other purpose will come later. Hhe 
"&" can be pronounced "the address of." So "&c" means the address of c. This 
statement assigns the address of c to ptr. If we now do c=5, what will ptr 
contain?? Hie same thing, ptr holds the location of the variable c. No matter 
what c contains, the location of c will not cshange. Variables cannot move 
around in memory. Ptr just contains a number, perhaps 15000, just a memory 
location. To tell ptr to look somewhere else, say the variable x, all you need 
do is ptr^x. 

Now is the time to mate an inportant distinction: 

int *ptr; /* ptr is a pointer variable */ 

ptr=5&c; /* &c is a pointer constant */ 
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You can change the contents of a pointer variable. You cannot dhange a 
pointer constant — it is a number! Just like you can say x=3 but you cannot say 
3=x. TMs my seem obvious ^ but this can get confusing later on. Just ronanber 
the difference betv^een a pointer variable and a pointer constant. The first is 
a variable, the second is a number. A pointer variable contains a pointer 
constant, but you can use constants in other places as vjell. More on that some 
other time!! 

Now that we know how to declare a pointer variable and assign it, v*iat do 
v«e dowith it??. Well, look at the following: 

*ptr=5; 

The first line is obvious; it assigns c the value of 5. But vrtiat does the 
second line do?? The same thing! ! Here are using a technique called 
"indirection," or, as I like to call it, going through the basement, ptr 
contains the address, or location of c. If you were to print the contents of 
ptr, you would have some Isurge number. But once put the eisterisk in front of 
it, we are saying "look at ptr's address, and access what is sitting there." In 
this case, we are saying, "Ptr, you are looking at a variable. Put the 5 
there." You are ma]cing two junps at once... the conpiler looks at the address in 
ptr, then juitps to that address and see what's there. Similarly, if ws want to 
know the value at c, ws can do this: 



int d; 
*=*ptr; 

Get the address out of ptr, hop over, get the value sitting there, and 
assignit to d. We are accessing the variable c INDIRE3CTLY, by using it's 
address. 



This seenns like an awfully silly way to do things! ! Why all this han3cy- 
panl^ with pointers and go DIRECTLY to the variable in question? Look at this: 



int *ptr; 
roain( ) 
{ 

int answer; 



/* declares an external pointer to an int */ 



/* automatic (local) integer */ 
ptr=&answer; /* ptr now points to answer */ 
add(5,2); /* calls addO */ 



} 

add(nl,n2) 
int nl,n2; 



{ 



/* nl=5, n2=2 */ 

/* declares the above as integers */ 



*ptr=nl4n2; 



Biis itsy-bitsy program oc3inbines severed things I have covered before. 
Take a good look at the pointer used. First of all, we only have one external 
variable here: ptr. If we were to move ptr inside mainO, that would mate it 
unavailable to add( ) . So ws decleure it as extemsd. Then declare answer to 
be an int. Now, usii^ the address operator (&), assign the address of answer to 
ptr. Nc3w that we have done this, we can access answer anywhere in the program. 
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Then we call the add() function. Once inside^ add the two numbers together, 
and, using the indirection operator {*), we tell the ccxtpiler, "Here is this 
sum. Go to the address contained in ptr, and deposit this sum there." When we 
exit this function and go back to raain( ) , where does the sum end up? Why in 
answer, of course! Ptr contained the address of "answer." In fact, you can 
think of the ccrapiler as a mailitan. He looks inside ptr, gets the address, and 
delivers sum to the mailbox it found at that address... in this case, that 
nailbox is the variable "answer." 

Note that in the above example, we used ptr to point to only one variable. 
Si^poed we want severciL answers, and we want to keep them in separate 
variables? All you need do is change the contents of ptr to point to whatever 
variable you want, like this: 

ptr=&answerl; 

(...) /* calculate answer */ 

ptr=&ansvi^r2; 

(...) 

ptr=&answer3; 
(...etc.) 

Just by changing the contents of ptr, you can point to any variable you want. 

The above exaitples are trivial. From the last article, you learned how to 
easily return a value back to the calling function using the return () 
statement. But retumO only gives back one value. By using pointers, you can 
alter as many values as you want. For instance, si^^wsed you v^t to swap the 
contents of two values. Uiis would be done like this: 

main( ) 
{ 

int x,y; 

x=2; 

y=19; 

switch(&x,&y); 

} 

switch (nl,n2) 
int *nl,*n2; 
{ 

int tenp; 
tannp=*nl; 
*nl=s*n2; 
*n2=tenp; 

} 

X and y and local variables. Using normal means, we cannot change the 
values of x and y outside of mainO. So, instead of giving addO just the 2 
variable on a platter, we give them the addresses. In this way, addO can go 



through the basoftient and change the contents of x and y. So, in order to 
inform switch () that it is getting addresses (or pointer constants), declare 
nl and n2 to be pointer variables. Only pointer variables can contsdn 
addresses, nl and n2 now hold the addresses of x & y. Vfe create a "t»p"orary 
variable, and we do the switch. Since nl and n2 are pointer variables, to get 
at the actual values, use indirection {*). If had just nl=n2 instead of 
*nl=*n2, all we would be switching are addresses, but not the contents of the 
addresses. Just a pointer variable by itself holds an address. But with an 
asterisk, we access the value contained at that address. 

The main thing to remeniber here is that you can pass values to functions 
easily. But in order to CHftNGE the vsiLue of an outside variable, you must use 
pointers. 

Wowll Confusing, isn't it?! I suggest you reread this tutorial many times. 
Bay a book on C (a good one) and read all you can about pointers. I've tried to 
make things a bit clearer by using "ordinary" language (like "through the 
basement"). When fiddling with numbers and pointers, you will run into 
difficulty seeing yo\ir results because c99 does not have printfO, which allows 
the output of nuDnabers. In our case, we must first convert the number into a 
string, then print out the string. This is done with the file called CONV;C on 
the release disk. Please refer to the file called OONVT.C in this DL for a 
little tutorial on how to use the O0NV;C function to print out numbers. Next 
time, I'll cover char arrays and strings, and, eventually, the biggie, string 
arrays. 



c99 Prograinmmer's Reference Sheet 
COTpiled by Herman Geschwind 
Compuserve ID 73557,3447 



CcOTtiand/Function 


Description 


Include File 


o=getchar( ) ; 


Read one character f ran the keyboard 




CSUP 


c-putcharCc); 


Write one character to the screen 




CSUP 


c-gets(buff ) ; 


Read a line from the keyboard 




CSUP 


puts(string) ; 


Write a string to the screen 




CSUP 


e3d.t(c); 


Exit the program 




CSUP 


abort(c) ; 


Exit the program 




CSUP 


locate (row, col); 


Locate the cursor on the screen 




CSUP 


key-poll(c); 


Check keyboard status 




CSUP 


tscm(f fb) ; 


Change screen color 




CSUP 


\mit-f open (name, mode) ; 


Open a file 


stdio 


CFIO 


c-fclose(\anit); 


Close a file 


stdio 


CFIO 


c-getc(x3nit) ; 


Read one character f rcxn a file 


stdio 


CFIO 


c-putc(c,imit) ; 


Write one character to a file 


stdio 


CFIO 


c-f gets ( buf f , col, imit); Read a string from a file 


stdio 


CFIO 


c-f puts ( string , imit ) ; 


Write a string to a file 


stdio 


CFIO 


c-fread(buff ,len,unit); Read a record frcxn a file 


Stdio 


CFIO 


c-fwrite(buff,lenf unit); Write a record to a file 


stdio 


CFIO 


fseek(unit,recno) ; 


Set record number 


stdio 


CFIO 


fdelete( filename) ; 


Delete a file 


stdio 


CFIO 


o-feof (unit); 


Test for end-of file 


stdio 


CFIO 


c-ferrc(unit) ; 


Get error code 


stdio 


CFIO 


rewind ( unit ) ; 


Rewind a file 


stdio 


CFIO 


grflO; 


Set to graphics 1 mode 


grf Irf GRFl 


textO; 


Set to text mode 


grf Irf GRFl 



vj09in)anci/jjescripci.on 


Function 


Include File 




Set screen color to c 


grflrf GRFl 


coxorvcSf Tf Of ; / 


Change colors for char set cs to f/b grf Irf GE^l 


cnraef (cn, str ; ; 


Define character patterns 


grf Irf GRFl 


cnrsetl ) ; 


Load standard character patterns 


grflrf GBFl 


patcpy(arb); 


Copy character pattern 


grflrf GRFl 


ciear( ) ; 


Clear the screen 


grflrf GRFl 


hchar(rfCfCh/n) ; 


Place character n tiines horizontally grf Irf GRFl 


vciiarvrf Cf Ciif n; ; 


Place character n times vertically 


grflrf GRFl 




Retiim value of character at r c 


grflrf GRFl 


s-joyst(Ur&&Xf &&y) ; 


Read joystick u 


grflrf GRFl 


c-key(u,&&s) ; 


Read keybocurd u 


grflrf GRFl 


spr ite ( spn f chf coif car, dc) Define sprite 


grflrf GRFl 


spcSeKspn); 


Delete sprite 


grflrf GRFl 


spdalK); 


Delete all sprites 


grflrf GRFl 


spcolr(spnfCol) ; 


Set sprite color 


grflrf GRFl 


sppatCspHfCh) ; 


Set sprite pattern 


grflrf GRFl 


sploct(spnfdrfdc) ; 


Set sprite location 


grrxrr vsixtj. 


spmag(f ); 


Set sprite magnification 


grflrf GRFl 


sprootnCspn, rVfCv) ; 


Set sprite velocity 


grflrf GRFl 


Frocrt(n) ; 


Enable sprite autorootion 


grflrf GRFl 


spposn(spnf &&rpf &&cp) ; 


Return sprite position 


grflrf GRFl 


dsq-spdist ( spnl f spn2 ) ; 


Return distance between sprites 


grflrf GRFl 


dsq-spdrc(spnf drfdCf ) ; 


Return dist. betw. sprite and loc. 


grflrf GRFl 


flg-spcnc(spnlfSpn2ftol) Sprite cx)incidence 


grflrf GRFl 


flg-spcrc(spnf drfdc) ; 


Coincidence sprite and location 


grflrf GRFl 


flg-spcalK ) ; 


Coincidence of all sprites 


grflrf GRFl 


float nun±>er[FljOATLEN]; Define float type 


f loati FLOAT 



CcxnnandAtescription 



Function 



Include File 



c-fpgets(Srf); Pronpt for floating point number floati FDDAT 



fpput(f ^s); 


Display floating point number 


floati FLOAT 


c-itof (irf ); 


Converts integer to floating point 


floati FLOAT 


i-ftoi(f); 


Converts floating point to integer 


floati FLOAT 


c-stof (s^f ); 


Converts string to floating point 


floati FLOAT 


c-ftos(f ,s^inoderSig,dec)Float array to string array 


floati FLOAT 


c-fexp(flrOprf2,res) ; 


Execute float expression 


floati FLOAT 


c-fexp(fl/'+%f2,res) ; 


Add two nxjsiibers 


floati FLOAT 


c-fexp(fl,"-%f2,res); 


Subtract two numbers 


floati FLOAT 


c-fexp(fl/'*%f2,res); 


Multiply tvgo numbers 


floati FLOAT 


c-fexp(fl/7%f2,res); 


Divide two numbers 


floati FLOAT 


true-f com( f 1 ^ rel t f 2 ) 


Conpare tw floating point numbers 


floati FLOAT 


c-fint(fl,f2); 


Returns greatest integer value 


floati FLOAT 


c-fcopy(fl,f2); 


Copy one float array to another 


floati FLOAT 


filptr-topenCn^a^s) ; 


Open a file(nameraccesSffsize) 


tcioi TCIO 


eof-tread(brr,f r&&s) ; 


Read a file(buff rrec,fileptr,&&size) tcioi TCIO 


eof-twrite(b,r,f rs) ; 


Write a file(b\iff ^recfileptrrSize) 


tcioi TCIO 


eof-tclose(fileptr) ; 


Close a file 


tcioi TCIO 


randondze( ) ; 


Initialize random seed 


random; c 


mdnumO; 


Generate a 16-bit random number 


random; c 


md(n); 


Generate a random niinber betw. 0&&n-l random; c 


n-atoi(s); 


Convert string to integer 


oonv;c 


s-itod(nbrrStr,sz) ; 


Convert number to signed deciital 


conv;c 


n-xtoiChexstr^nbr) ; 


Convert hexstring to integer 


oonv;c 


bitmap(fore,back) ; 


Change to bitmaK)ed screen mode 


biti BITSUP 


bitclrO; 


Clears the entire screen 


biti BITSUP 


plot(x,yrC^t J; 


Turns on single pixel 


biti BITSUP 



COTinand/bescription 


Function 


Include File 


Iine(xlryl,x2,y2^c^t) ; 


Draws line between two points 


biti BITSUP 


rect(xl,ylrx2,y2rC,t) ; 


Draws a rectangle 


biti BITSUP 


circle(xCryc,rrCrt) ; 


Draws a circle 


biti BITSUP 


bitxt( ) ; 


Copies ASCII characters into CPU RAM biti BITSUP 


bpiitch(ASCIIfrrCrCX)l) ; 


Similar to putcharO 


biti BITSUP 


bputs(rrCrColrStr) ; 


Similar to putsO 


biti BITSUP 


blanks(rrc) ; 


Places a blank on the screen 


biti BITSUP 


btblanks(rrCfCOunt) ; 


Blanks sequence of locations 


biti BITSUP 


bgetch(rrC/Col) ; 


Returns keypress of user input 


biti BITSUP 


bgets(buffaclr,s,r,c, col) Inserts characters in buffer 


biti BITSUP 


getky( ) ; 


Scans keyboard similar to pollO 


biti BITSUP 



Notes: The purpose of "c99 Quick Reference" is to provide a handy surmary of 
c99 cOTinand syntax and required parameters, a brief dscription and a reference 
to "include" and "object" files required to si?3port a particular coitinand. All 
references were re-capped frcxn Clint Pull^'s release diskette for c99 Version 
2.0 except for "biti" and "bitsup" \(rfiich are based on Jay Holovacs BITRTN and 
BIIWRT Rel. 2.0. By necessity the description of the carmand had to be brief 
and is intended to be more of a "memory jogger". In all cases the user is 
urged to refer to the full documentation for all items .The naming of include 
and object files reflect the preference of the coitpiler of this quick 
reference. You may have your cwn system and can feel free to use any suitable 
editor to make necessary changes. 
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Steppinfi rCI^TIi intc a new laniiuaae 
with yeur 99/4 A« and Geneve 

by Howie Rosenberg 
Compuserve ID 74216,1640 

The FORTH language was developed by Charles Moore in 1969. As he stated, he 
developed the language as an interface between him and the computers he 
programmed. He placed the language in the public domain. The language has been 
promoted by the Forth Interest Group(FIG) of San Carlos California. FIG has 
available Assembly source code and architecture guides for each major processor 
for a nominal fee. These items are in the public domain. Both major versions of 
FORTH available for the TI-99/4A were derived from the FIG model. 

In 1983 version 1 of Wycove FORTH became available. A short time later the TI 
version of FORTH was released to the public domain. There were flaws in both 
version. First were(are) a number of bugs which carried over from the FIG 
model. Several bugs peculiar to each of the versions also existed. The Wycove 
version had one fairly serious flaw in that method of storing data (screens) 
was somewhat flawed and the FORTH editor could not be used to full 
advantage. Proponents of the Wycove version claim increased speed which while 
true is considered not of any significance by most FORTH programmers as 
indicated by the fact that the TI version has gained much wider acceptance. 
Version 2 of Wycove FORTH while it offers some improvement of the screen 
structure, still was not the same as the FIG standard. There is still a debate 
in some quarters as to the relative merits of the two versions. I feel these 
are somewhat academic. TI IS the standard in our community and will most likely 
remain so. Whether it is due to the merits of the two versions or simply 
because the TI version was free is of academic interest. 

ON STACKS, RPN, AND OTHER FORTH "HORRORS" 

The characteristics of the language which are noticed, commented on, and in 
many cases used as an excuse to quickly depart for more traditional languages 
are all based on a simple idea one which is a central theme of Charles Moore's 
FORTH. Make it simple for the machine not necessarily for the programmer. This 
results in the highest degree of flexibility and speed in a higher level 
language. Thus while stacks are used internally in the architecture of all 
computers, not only are the stacks accessible in FORTH but must be utilized. 
The parameter stack is the only way to transfer data. The FORTH prograrraner 
enters data on the stack prior to executing a word. The resultant data from the 
word is outputted to the same parameter stack. In addition the return stack is 
readily available for use, indeed must be used in many applications so that the 
programmer must keep track of the status of this stack. This idea of putting 
numbers on the stack for use of the next word leads to the statement by many 
that FORTH uses Reverse Polish notation(RPN). Thus instead of 1+1=2 we have 1 1 
+ . 2 in FORTH. It is actually somewhat ironic in the TI world. For a long 
time, prior to the TI99-4 computer a long time competition existed between the 
two giants in the calculator world, TI and Hewlett Packard. Texas Instruments 
calculators all utilized an algebraic system AOS which TI claimed simulated the 
way people did arithmetic. On advanced calculators up to 9 levels of 
parentheses were allowed and arithmetic expressions were(and still are 
evaluated by entering equations left to right, with parentheses used as needed 
to indicate deviations from the normal hierarchy(first exponentiation followed 
by multiplication/division and finally addition and subtraction). The Hewlett 
Packard calculators used RPN and the user had to chew his way out from the 
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middle of an expression and understand what he was doing to a much greater 
extent than did the TI calculator user. TI calculators were easier to use 
without much training or thought. Hewlett Packard calculators ran faster and, 
when comparing programmable calculators were considerably more efficient in 
terms of programming space. Based on calculator history RPN in a TI machine is 
indeed ironic. Another factor which seems to keep some prograirsners away from 
FORTH is the fact that the primary arithmetic system for FORTH is fixed point 
rather than floating point. Numbers can be single length(2 Bytes), double 
length (4 Bytes) or if needed the prograimner can define even larger numbers. The 
use of fixed point arithmetic leads to efficient and fast running code. 
Sacrificed is ease of use. The programmer must understand any arithmetic 
manipulations used in his programs, size the results, decide on accuracy versus 
range of answers and the like. In short easy for the machine, a bit more 
difficult for the programer. Of course in both TI versions floating point 
routines are provided. Actually the floating point routines are links to the 
console GPL routines with there inherent Uck of speed. There are cases where 
floating point is quite useful. Some FORTH systems have included hardware 
floating point which not only does not slow down the language but can run 
faster than software fixed point routines. In summary the use of the stack, 
RPN, and fixed point arithmetic as used in the FORTH environment is quite 
natural, leads to efficiency and speed in a higher level environment and really 
is well worth the effort for those who are willing to make the effort to learn 
how to deal with them. 

WHAT IS FORTH? 



FORTH IS A THREADED INTERPRETIVE LANGUAGE. The use of "interpretive" in this ^ 

instance is somewhat confusing as the run time code is actually compiled code. 
FORTH applications consist of "words". New words are defined which call on 
previously defined words not unlike the concept of procedures in LOGO. Those 
words which are included in the basic FORTH language i.e. the primitives are 
called the kernel. The words in the kernal and any new words added in a 
particular application comprise the FORTH dictionary. Any new application has 
all words from previous applications which are presently in the dictionary 
available to it. 

FORTH IS AN OPERATING SYSTEM. Moore's basic aim in designing FORTH was to 
provide an operating environment which while operating a higher level language 
would provide the maximum efficiency and speed at run time. To this end the 
FORTH system was designed. The system provides a disk operating system which 
was foreign to Tiers and which still causes difficulty to many. A FORTH disk is 
divided into screens. Each screen consists of 16 lines of 64 Bytes of source 
code, Text, data, or program image. Each screen thus requires 1024 Bytes or 4 
sectors. In TI FORTH after the FORTH system is booted, screen #3 is 
automatically loaded thus enabling auto start of an application or customizing 
the configuration. Five screen buffers are provided. These are used to store 
screen information on command. When all five buffers are full, a subsequent 
request for screen data results in the screen which was accessed least recently 
to be reused. Thus the FORTH disk system is a virtual memory. The utmost in 
simplicity and flexibility are provided in the operating system which allows 
for easy alteration. Many functions can be altered merely by changing the value 
of a user variable. 

FORTH IS AN ASSEMBLY LANGUAGE. There is an assembler built into FORTH and words ^ 
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can be defined directly in assembly language as well as in higher level FORTH. 
The end result is similar to that which many of our EXTENDED BASIC progranmiers 
have been doing namely using the higher level language to provide simple non 
time critical functions and linking to assembly routines where needed. The 
process is somewhat simplified in FORTH as the code routines are direct 
replacements for higher level FORTH words. The process of linking is automatic. 
There are versions of FORTH not available for the TI-99/4A which have the 
ability for direct compilation of runable object code which can be run in the 
system without booting FORTH (i.e. establishing the FORTH environment). The 
result of such a compiler is Assembly object code. Supposedly all Atari arcade 
games which were produced for various machines including the TI-99/4A were 
written in FORTH and processed with a target compiler. 

FORTH IS EXTENSIBLE. Changes can be rather easily made to any words in the 
dictionary. Of course care must be used when changing words In the kernel which 
are used by other words or the system will most assuredly crash. I can think of 
no other language which can be changed with such ease. 

THE FORTH ARCHITECTURE 

Maximum utilization of the FORTH language requires some understanding of the 
architecture of the language. This is more true of FORTH than other languages 
in that the elements of the language, stacks, users tables etc. are readily 
accessible to the user. For purposes of this note a short description is 
sufficient. TI FORTH utilizes memory much like the typical FIG FORTH system. 
Lower memory is used for support functions, the disk buffers, and the return 
stack. Upper memory contains the dictionary at one end, and the terminal input 
buffer at the other end followed by the parameter stack. The stack and 
dictionary are thus able to grow toward each other. Applications which require 
a large number of stack entries(unusual) can thus be handled by keeping the 
dictionary small. In turn by keeping the stack small, large applications can be 
handled. 

THE STATUS OF TI FORTH IN OUR COMMUNITY 

FORTH has been with the TI-99/4A community for 3 years. The FORTH programming 
community is not large but with few exceptions once a prograiraner has taken the 
trouble to learn FORTH and has started to use it he stays with it. There have 
been few corranercial FORTH programs but those, which are available illustrate the 
capabilities of the language quite well. There is also a considerable array of 
public domain software for the TI written if FORTH. 

Within the FORTH community there has been several major versions of the 
language after the FIG version. The latest of these is FORTH 83. While FORTH 83 
has features which cannot be utilized in the 99/4A environment because of 
memory restrictions, the language is, generally transportable. Of course as 
always machine specifics in any language act as a restriction to 
transportability. Those Tiers who try their hand at programming other machines 
will find that FORTH programming experience on he TI will be entirely 
applicable. Those of us who stay with the TI have found a language which has 
given us much greater control of your programming environment than available 
with other languages. 



(As lectured by Chick De Marti) 



INTRODUCTION - 



FORTH is all things to all people. It is extensive (you can do 
anything in FORTH). It is -fast (almost as -fast as ASSEMBLY). It is 
EASY (to the extent it is user -friendly) and it is complex (it can 
challenge the mind o-f the ASSEMBLY Programer). 

While many routines appear to be simular to BASIC or EXTENDED 
BASIC, ( see PLATE 1 ) these languages can not be compared to each other. 
FORTH, like FORTRAN, COBAL etc. is concidered to be a *HIGH LEVEL' 
language. While it uses words that are common in the English language, 
it requires less interpretation into machine language than most o-f the 
other languages. 

Because o-f it's structure, FORTH uses no . .riin-time error check- 
ing. FORTH's compiled code is compact ...(it's) applications require 
less memory than their equivalent ASSEMBLY' programs!" (1) 

FORTH is transportable (it has been used on just about ev€?ry mini- 
and microcomputfer known to the industry). Charles Moore who invented 
FORTH in 1969 said in all computer languages we, the operaters, have to 
learn the computer's language. He created FORTH, a language with which 
we are able to teach the computer only those words requirenJ to complete 
an assignment. 



IS FORTH A GOOD LANSUASE? 

••..•First, FORTH is more than just a language. It can be a stand- 
alone operating system that provides basic support -for terminal and 

disk control. f-no^o 
••Multi -tasking and multi-user FORTH systems are available. FORTH 
has been called a psuedo-machine language because the key words used for 
moving data -from place to place are simular to the techniques used in 
assembly language. 

••FORTH is an on-line interpreter. Commands are given to FORTH from 
the keyboard in a manner simular to the immediate mode' o-f most Basic 
interpreters. This is ideal for the development and debugging of the 
program. The programer can try out sequences of commands, one at a time. 
After the programer is satisfied that the sequence works properly, he 
can make it a permanent part of FORTH by giving it a name. Later, it 
can be called ( type it's name ) to perform by itself or as part of an- 
other defined word. (1) 

FORTH was first used as a computer control for large telescopes. 
While it continues to be used by many observatories, it also is being 
used to control ROBOT cameers, remote sensors of water depth and as an 
aid in navigation of large barges in inland waterways. General Electric 
also uses it to diagnose and trouble shoot large electric locomotives 
and it has been used in weather prediction programs. 
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To program in FORTH, you must know what a STACK is because ^Imost 
all FORTH operations involves a STACK in some way. When adding 2+2, 
both numbers must be on the STACK and the sum is placed on the top o-f the 
STACK. The same goes -for subtraction or multiplication or any operation. 
The STACK is actually the MEMORY AREA 

You will learn to understand the function and operation o-f the stack 
both from outside and within a loop. Also, you will learn to store in- 
formation and move it at will. With 'hands on' experimenting, you will 
become comfortable in FORTH and with your new found confidence, you will 
be able to let your own imagination dictate the programs you can write. 
The least you should accomplish is to be able to confidently enter and 
run the various programs that will appear < and are appearing ) on the 
Source Boards, in books, magazines and Computer Group Newsletters- 



3UGGESTED READING 

There are many magazines and books dedicated to the furthering of our 
education in FORTH. MICRO (magazine) continues to increase it's articles 
on FORTH. Another excellent source of information is FORTH DIMENTIONS. 
MILLER GRAPHICS puts out an excellent Newsletter ... and for the more am- 
bitious- programers, FIG ( FORTH INTEREST GROUP ..PO BOX 1105, San Carlos 
Calif. 94070 ) publishes a bi-monthly newsletter. Membership in FIG is 
4^15.00. Other suggested reading iss 

STARTING FORTH by Leo Brodie 

published by Prentis Hall 
THE FORTH MANUEL < of your choice ) 
INVITATION TO FORTH by Katzan 

published by Petrocelll Book 
FORTH PROGRAMMING by Leo J. Scanlon 

published by Howard W. Sams Co. 



VARIETIES t3F FORTH 

The main standards of FORTH that exist are FIG/FORTH, FORTH 79 and 
FORTH S3 ( which is an update of FORTH 79 >. Some spinoffs are WYCOVE 
FORTH and TI-FORTH < an extension of FIG-FORTH ). All are outgrowths of 
the original FORTH Inc. started by Charles Moore. 

FORTH is extensible. It's programs are interchangeable with most 
othe computers. Included are APPLE, IBM and the VIC family < 20 and 

and the 64 ) . . as well as TEXAS INSTRUMENT'S 99/4A. The resident words 
that one computer may contain can easily be defined in another languag. 
An example ... Apple's 'HOME' can be defined : HOME els GOTOXY ; 

Many of the differences have been documented in both Brodie 's START- 
ING FORTH and Leo Scan Ion's PROGRAMMING IN FORTH. 
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FORTH *S STRUCTURE 



RESIDENT AND OPTIONAL WORDS 

" The ACT o-f programming in FORTH is the act o4= de-fining * WORDS'" 
WORDS can be made up o-f other user de-fined words. *' and -continue until 
a single word becomes the application desired. (2)" 

Each new WORD is added to the dictionary and can be used in the de-f- 
inition o-f future programs. The -format o-f a WORD iss 

: name operation < or data section ) } 

The colon at the beginning tells the compiler that the -following items 
are the components o-f a *UIORO'. The *NAME' can be o-f any combonation 
of letters and numbers, ie ?NOTE MOV/B etc. ( also see CLASS 2 ). 

The *DATA' can be a CONSTANT, A VARIABLE, LIST OF VARIABLES or TEXT. 
The semicolon denotes the end o-f the WORD de-f inition. 

" Since a FORTH word must exist before it can be referenced, a 
bottoms up programming decipline is en-forced" (2> Thus we must learn 
to program "... -from the bottom up" (2). Words take their parameters 
from the * STACK' and place the results on the STACK 



AREAS WE WILL COVER 

Besides 'RESIDENT' words you have a choice of 20 optional or 'ELECTIVE 
BLOCKS' you may add to the computer's memory. We will work primerily 
with <S> -SYNONYMS, <E> HEDITOR, <V> -VDPMODES and <P> -PRINT. 
(See Page 5 Chap.l of TI FORTH Manuel for a complete list.) 



♦ NOTE ♦ <S> includes -DUMP -TRACE -COPY 

<V> includes -TEXT -SRAPHl -MULTI -GRAPH2 

<P> includes -FILE 

<E> includes -64SUPPaRT 



STACK MANIPULATION WORDS 8 

DUP ROT 

DROP -DUP 

SWAP >R ( R> > 

OVER R 



ARITHMATIC OPERATORSs ' 

+ - / ♦and later MOD AND 

/MOD OR 
♦/MOD 
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REQUIRED EQUIPTMENT 




DISK DRIVE (For the ti 
to one dri 
Drive 0, b 



STARTING UP YOUR SYSTEM: 

1 ... Put your "SYSTEMS" disk in the drive. 

2 ... Turn on ED I TOR /ASSEMBLER Module. 

(use OPTION 3 ... LOAD) 

3 ... type DSKl. FORTH <ENTER> 

4 ... type -EDITOR -SYNONYMS -PRINT 

5 ... TO EDIT A SCREEN! 

(A) type 3 EDIT <ENTER> ( this gets you onto screen 

(B) use ARROW keys to move the cursor 

(C) press FCTN 9 to get out of the EDIT mode. 

^6-) Take your SYSTEM disk out of the drive and replace it 

with a blank initialized disk (use your DISK MGR for 
the time being). This will be your PROGRAM DISK. 

7 ... type EMPTY-BUFFERS <ENTER> 

8 ... type (any number) EDIT <ENTER> 

You will find that you have 90 blank screens on your 
program Disk. Here is where you will store your pro- 
grams and experiments. 

CONOR ADUL AT I ONS ! 

You are now in FORTH and have executed 3 commands: 
-EDITOR -SYNONYMS -PRINT (all one group) 
EMPTY-BUFFERS and 
(number) EDIT 

REMEMBER: 



Only use your ORIGINAL FORTH disk to make a "SYSTEM" (or 
working) disk. A back-up copy can easily be made using the 
copier found elsewhere in this volume. At this point, let's 
try out seme new words (commands) : 



UPDATE, LOAD and SWCH and UNSWCH 
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Entering J="LUSH recopies the entire disk (like SAVE DSKl.xx;< 
in BASIC). I-f you want to copy a particular screen -from an- 
other disk, DO NOT FLUSH it to your di sk. . . i nstead : 

Type UPDATE <Er4TER> This assures you that this par- 
ticular screen is currently 
resident in your console. 
Put your disk in the drive and: 

Type (n>LOAD <ENTER> 

Where "n" is the number o-f the screen you want it copied to. 

NOTE; A word o+ warning ALWAYS EDIT screen <n> be-fore you LOAD 

something to it... too many times we write over an important 
screen. I-f your planning on making changes to a certain 
screen, make a PRINTed copy o-f that screen BEFORE you change 
it. I-F your have already loaded the resident block o-f words 
under the title -PRINT (see #4 in apragraph "STARTING UP YOUR 
SYSTEM"), then you are ready. 

Type SWCH <n) TRIAD CR UNSWCH 

NOTE: T his is very important... ALWAYS end your SWCH command with 
"UNSWCH". "SWCH" switches on your printer. I-f you do not 
include "UNSWCH" (unswitch) , the printer will stay on... your 
console will become disables, as though it had crashed! 



YOU DID ITf YOU DID IT!! 

You now have some control o-f the FORTH environment ... you can: 

make a copy o-f an entire disk in FORTH ( FLUSH ) 

You can locate and examine a screen ( n EDIT ) 

You can print a copy o-f a screen (SWCH n TRIAD UNSWCH) 

You can copy a screen to a Prog. Disk ( UPDATE n LOAD ) 



And because you are getting used to the -format, the language 
you are ready to peruse the volumns o-f misc. in-formation put 
out by various books and newsletters. The -following will be 
some I have selected as being worthwhile -for the beginner. 
It does not represent all that is available, but you'll -find 
it in-formative, instructive and interesting. 

So FORTH my -friends. Chick 
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1. Boot ins Th« Forth SystaM 

a. Znsart tha Editor/Asaamblar aodulo. 

t». Switch ori tha P-boM, Monitor and eonaola. 

c. Xnaart tha SYSTEM DISK. If you hava two drivaa, uaa 

d. Praaa ENTER. Praaa S. Tha B/A aalaetiona appaar. 
a. Praaa 3. Tha fila na«a raquaat appaara. 

f. Typa, DSKl. FORTH (Praaa ENTER) ^ .:^-rso. 

Q. Tha FORTH Manua appaara. Typa, -EDITOR (Praaa ENTER) 

h. Typa, -DUI^ (Praas ENTER) 

i. Typa, I BLOCK DROP UPDATE (Praaa ENTER) 
J. i^pmj A ^OCK DROP UPDATE (Praaa ENTER) 

k. typa, S BLOCK DW UPDATE (Praaa ENTER) ^ ^ ^.^^ 

1. RaiRova tha SYSTBH DISK and ralaca it with a blank diak which 
wil)..ba fermattad. into a UORKINS DISK. 

S. Praparing tha W0RKIN8 DISK 

a. Typa, S FORMAT-DISK (Tha ia aaro) (Praaa ENTER) 

b. Typa, FLUSH (Praaa ENTER) 

3. Entarlng a prograoi on a SCREEN 

a. Typa, 1 EDIT (Praaa ENTER). If tha SCREEN ia not claar, axit 
tha SCREEN by praaaing FCTN BACK • ^ 4. 

b. Typa, 1 CLEAR (Praaa ENTER). Thia action claara tha SCREEN but 
doas not ratu»n^ you to tha SCREEN. 

e. Typa, ED9 (Praaa ENTER). Thia action ratuma you to tha 
SCREEN in tha EDITOR aoda. 4 4.k- 

d. Tha euraor i a now en I ina 0, at tha laft Margin. Typa in tha 
proaraM liatad on paga 13 of -STPRTINS FORTH". On lina 7, typa 
tha lattar F . Do not uaa any punctuation '^'^•*»lJi*»«JlF?J*»"*"*" 
antry ia eoMplatad, OMit tha SCREEN by praaaing FCTN BACK . 

«• Typa, 1 LOAD (Praaa ENTER). Thia action will lead and awocuta 
^tha LETTER-F pregraM. « 

*. Typa, FLUSH (Praaa ENTER), if you wiah to aava *»»a prograa. 
Thia action writaa tha prograa to SCREEN •! of tha MORKINS DISK. 
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<♦<♦ FORTH 


and X-BASIC SIMULARITIES ♦>♦> 






BASIC (or Extended) 




FORTH 


Section 
Location 




" (to enclose a string) 




• * (needs an ending ) 




2. 


s s 


(2 blank spaces 




. CR CR (carriage returns) 




3. 


CALL 


CLEAR 




CLS (also same on apple) 


RESIDENT 


4. 


CALL 


CHAR(42,*1234' 




1 2 3 CH 


— 6RAPH 


5. 


CALL 


C0INC(#l,«2,a,C) 




18 COINC 


MUN n 


6* 


CALL 


COINC(ALL) 




COINCALL 


— w^rw"n 


/ ■ 


CALL 


COLOR (3,2,1) 




12 COLOR 


nnnnii 


Q 


CALL 


COLOR (#1,12) 




11 SPRCOL 


— BRAPH 




CALL 


DELSPRITE(#1) 




DELSPR 


—GRAPH 


1 01 


CALL 


DELSPRITE(ALL) 




DELALL 


— wKRPM 




CALL 


6CHAR(R,C,A) 




C R 6CHAR 


— OftH^Tl 


1 *y 


CALL 


HCHAR (3,3, 96,28) 




2 4 28 96 HCHAR 


— IsrCHrrl 


X o« 


CALL 


LOCATE (#2, 88, 120) 




119 79 1 SPRPUT 


— tsfwrri 


1 A 


CALL 


MAGNIFY (2) 




1 MAGNIFY 


— ©rW#*fi 




CALL 


M0TIQN(#1,X,Y) 




Y X 1 MOTION 


— w%HrM 




CALL 


PEEK (^31880, A) 




-31880 


— w%HrM 


1 / • 


CALL 


PEEK (-31880, A) 11 PRINT A 


^^IdBU r or — ^laelB m • 


— wtHTrf 


18. 


CALL 


PaSlTION(#l,Y,X> 




SP6ET 


-GRAPH 


19. 


CALL 


SCREEN (7) 




6 SCREEN 




20. 


CALL 


SPRITE (#1,65, 10, 80, 


120) 


119 79 9 63 1 SPRITE 




21. 


CALL 


VCH AR ( R , C , CH , COUNT ) 




C R COUNT CH VCHAiK 


-GRAPH 


22. 


DISPLAY AT (12,18)1 ERASE 


ALL Bf 


tEPi-WE WANT FORTH" 





11 17 GOTOXY CLS BEEP ." WE WANT FORTH " 
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GOING FORTH 



by David Aragon 
512-826-8648 

CompuServe ID 75766, 336 



book^! l!I 2 "^^ ^° I®*''" P°RTH have been directed to a 

veri Sood^J^!'* It^^T^ -Starting FORTH.- I nuist say that it is a 
very good book for the beginner. Mr. Brodie goes step by step through 

i^;e;s?:;;d'*'?h°* ''""^ t" * * ^^-^i* .rnd'^uke^inrcS 

^^Ton S?"Fo™''%S^5r"^'^' ""^^^ * differences bet.«een his 
dJ^ ih2J rtfS?™' FORTH-79, and the TI version. TI was nice enough to 
?n a^C o? ttltr^''^ into print for us, but somehow forgot to put the. 
farSL I. therefore, have gone that one step 

tSe 2j^n«r;„ !7f^* ^'^^^ ^'^^^^ contains, I think, just about all o- 
cond2^~2 L *"°'?.r~ *° through Brodie' s book. It can be 

^ «Inu 1^ Brodie's book. I might suggest that you add it to 

your menu as was discussed last month. 

SCR « 

( STARTING FORTH WORDS ) 

ROT >R ROT >R , 8 2DUP OVER OVER ; 
2DVER SP3 6 * 9 STO 6 + a 5 . 2DR0P DROP DROP 5 
0> > } : NOT O* ; : ?DUP ~DUP ; 

II ^^r>*J » 2/ 1 SRA ; : 2! >R R ! R> 2+ ! I 
23 >R R 2+ a R> 9 ; . NEGATE niNUS 1 
1' R> R> R SWAP >R SWAP >R ; 

nM^S°r,™«J. J ^ DMINUS D+ ; : DNEGATE DMINUS ; 

SSy? °~ 0< IP 2SWAP ENDIF 2DR0P ; 

^LONs?SMT^BflVfSo^^ ^ 2SWAP ENDIF 2DR0P j 

-LONSTANT <BUILOS , , DOES> 29 t 

2VARIABLE <BUIU}S O. , , DOES> | 
SCR # 

( STARTING FORTH WORDS ) 
: D« D- 0» SWAP 0- AND ; : DO- O. D- : 
: D< D- SWAP DROP 0< ; : M+ D+ ; : 'S SP» • 
: M/ M/ SWAP DROP ; : >IN IN ; : MOVE 2/ MOVE • 

' .TpTS 2^ OVER U< IP drop drop DROP DR^IP 1 ELSE - IF 

U< ELSE DROP DROP ENDIF ENDIF ; 
! TEXT PAD 72 BLANKS PAD HERE - 

1- DUP ALLOT MINUS SWAP WORD ALLOT s 
s PLUS 32 WORD DROP NUMBER +.-»-. ! 

! t^i^^J^ ' • °0^> DUP 9 ROT t ♦ ♦ 2+ , 

Tl^J. * ^P 00 DROP 2*DUP2-9I»-DUP 

. llr^^r^rfJ^"^ 2 *LOOP SWAP. DROP ; 

: EXIT CCOMPILEa ;S ; IMMEDIATE 



B«Bid» th« re»ident WORDs in FORTH, you can create your own Nords. The 
■Tormato-F a FORTH word i»i 

I (name) (inetructions) | 
The colon announce, the .tart of a new WORD. The .eelcolon .iflnal. if. 
end. An eKamplei 

I BYE EMPTY-BUFFERS HON | 

"BYE" will fir.t clear the buffer, of any ejeory ^^^JJ^^™^ ' 
then the word "HON" will take you bach yo the TI LOGO «:reen. 

The following are J. VOLK'. "mo.t u.ed word.". Try '«». you'll like 'em 

EOitor 



SCR #91 

( MY MOST OSBD WORDS by J . Volk) ..^-n-d^ 

( LOAD -SINOHYMS FIRST If not already . . ^ 

. M?LOAD -GRAPH -VDPMODES ; ( Hill load tha.e option. ) 
AT OOTOXY ; ( Saee as 'Display At» ) 



TOP CLS AT : ( Saee as Brodle 'a 'FAGB' } 



RANDOM HMD ^* . \ u na-i/vn " I !«' .t.ak 1 

PICK ( Leave copy of nt-th nueber on top of stack ) 

7 ( n1 — n2 ) 

9 : ROLL ( Rotate nth number to top of •t«cl«_J v»'vS\r LOOP 
10 DOP 1 s IP DROP ELSE DOP 1 DO SWAP H> H> ROT >8 >H >R LOOP 

n ? 5o\> R> S; ROT ROT >R >R J-JJ^^-?;! "SJ.'o^it • ( FCTH 4 

12 : TEST BBGIM HELLO THERE* 2 SPACES ?TBRMIHAL OHTIL , K ruxs 

\\ :"Gf SoJ IF DOP 0< IF -1 ELSE 1 EiDIF "^-SE BMIF ; 

15 J WORK BLOCK DROP UPDATE ; ( My word to update a FORTH screen 

"'S ri word to copy FORTH dlsks-Single Drive 5/16/84 J. Volk ) 

1 ( Load Screen #91 and -COPY then BOM ) 

2 VARIABLE COPYSCR I>ISK_LO I ««» , n AT IMSERT M 

7 : C0PY2 2 11 AT IMSERT COPY DISK-AHY KEY KY DROP , 

8 ( COPY 5 SCREENS AND PRINT MESSAGE ) « ao = hmtiL • 

9 : GETIT BEGIN MES1 C0PY1 C0PY2 FLOSB COPYSCR # 89 = OHTIL , 

10 ( RONS ABOVE WORDS ) « /t/ii> • • 

11 . MESO TOP 2 11 AT ." INITIALIZE FORTH DISK ? (Y/M) . 

2 * Sic tJ? 2 1 AT .i INSERT COPY DISK • KEY DROP ; . 
\\ ; JlESO KEY 89 = IF MSG FORMAT-DISK DISK-HEAD ENDIF GETIT . 

in ( ROUTINE TO INITIALIZE DISK ) 
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Forth Tutorial #1 
By Warren Agee 
Ccxtpuserve ID 70277,2063 

PE^ACE: 

With this tutorial (and more to cxxnel), I humbly submit vtot I have 
learned by programning in the FORTH language. One reason I decided to put 
down into words the knowledge I have acxjuired is to share my experiences, 
frustrations, and triunphs while hacking away with FORTH. But, on a more 
personal level, I give these tutorials to the TI world as a token of 
s^jpreciation for everything I have gained from knowing such people as Ronald 
Albright, Barry Traver, and Howie Rosenberg, just to name a few, as well as 
the whole gang on the TI FORUM. Hiese and many others have given unselfishly 
to both me and the TI coninunily as a whole, and I am proud to be part of a 
oannmimitY that refuses to die. Now, on with the programnaing, FORIHwith! 
<ugh!> 

STRINGING ADC^ IN FORIH 

Of all the peculiarities the beginner confronts in FORTH, string 
handling is a major obstacle. Nothing is more frustrating than to sit down 
aiKa have no idea how to write scxnething like A$="1234": :AfVZ^(A$) . No 
advanced string-handling routines come with the TI FORIH systens disk. So, 
it is 15) to the programnner to invent his cwn. Hopefully, this article will 
make it much easier to write a FORTH program that involves any string 
manipulation at all. 

THE BASICS 

Before juirping into the new string words, let's first take a look 
at how a string sits in memory. Itiis knowledge is iitperative in order to 
fully exploit the power of FORTH. TMrik of a string as a niatieric array; each 
character in the string represents a number, or byte. The string HOME 
COMPUTER would look like this: 



|h|o|m|e| |c|o|m|p|u|t|e|r| 



Uie first "box" represents the address in memory v^ere this string 
starts. Determining the location of this address is what we will discuss 
next. 

There are many ways to store strings; we could save them in VDP 
RAM, or in the disk buffers. In this article, we will investigate storing 
strings directly in the dictioncury. A string variable is no more than a 
numeric variable stretcihed out. In fact, unlike BASIC, there is only one 
type of variable in FCKTH. Tlie only thing that differs is the size. First 
use the word VARIABLE to create a variable. But v*ien you create it, let's 
say VARIABLE TEST, only two bytes are allotted for storage. This is fine 
for single niaribers; but for strings, we can use ALLOT to specify the length 
of the variable. For instance, VARIABLE TEST 8 ALLOT will create a 
variable with a length of ten bytes. TMs gives us room for a string with a 



naxiinum length of 10 characters. If the above is executed, the variable 
will look like this in meroory: 



I I I I I I I I I I I 



addr of TEST 

Once the string is created in the dictionary, there may be garbage in the 
variable. Here we can use BLANKS to clean it out: TEST 10 BLANKS. This will 
fill ten bytes of memory, starting at TEST, with blanks (ASCII 32). 

Nc3w that space has been reserved for the string, there are 
bEisically tSfK> ways to store the string. If the contents of the variable is 
not going to change, then the word !" can be used. All this word requires is 
an address on the stack. So, to store STRINGS in the variable TEST defined 
above, the sequence TEXT !" STEm^GS" will do the trick. If you wish the user 
to input the string, the word EXPECT is available, which is similar to 
BASIC'S INPUT statement; it awaits an entry frcxn the keyboard. EXPECT 
requires both an address and the maximum length of the string on the stack. 
Using TEST 7 EXPECT will achieve the same results as TEST !" STRINGS" . 
The variable will now look like this: 



IS|T|R|I|N|GIS| I I I 



TMs presents our first problem. Since the contents of TEST is not 
expected to change, the length of the string can be assumed to always be 7. 
Hc3wever, if the length will vary, we must keep track of it. EXPECT does not 
do this for us. Sure, it requires a length on the stack, but it does not 
incorporate this value into the string. Not to worry. Ihis brings us to our 
first new word, ACCEPT, T>*iich replaces EXPECT. Ihe only difference is that 
ACCEPT stores the actxaal length of the string inputted into the byte 
preceding the string. TMs is often called the coxmt byte. If we use ACCEPT 
in the exanple above, our string would new look like this: 



|71S|T|R|I|N|G|S| I I 



addr of TEST 

As you can see, the first letter of the string, the "S", no longer sits 
at TEST; the v*iole string has moved over one byte to make roan for the 
count. Now, to print this string is a trivial matter of using TEST COUNT 
TYPE. TEST supplies the addr of the coitplete string. COUNT takes that 
address, calculates the address of the actual string (TESTfl), and finally 
s\:pplies the length of the strir^. Everything is ready for TYPE. To 
suffiroarize what we have done so far, consider the following exanple: 



VARIABLE OOOKIE 18 ALLOT (reserves 20 bytes) 
COOKIE 20 BLANKS 

OCXMOE 20 ACCEPT ^CHOCOLATE CHIP_ 
OOOKIE COUNT T£PE 

Note: any wrds that appear between underscore characters (_) are to be 
typed in as a response to the ACCEPT word. 

mmG AROUND 

\3p till nowr I have discussed performing basic functions on strings 
which reside directly in the dictionary. Ihis is not always the ideal 
situation. A nuch better way is to store the string in a tenporary spot, do 
%*iat needs to be done, then move it back into the dictionary. Hiis tatporary 
^ot is called PAD. Typing in PAD jxist leaves an address on the stack, just as 
TEST does . Topically, instead of t^ing in TEST 10 ACCEPT, you would type PAD 
10 ACCEPT. Once any processing is done, the word CMDVE can move the bugger back 
to where it belongs. Here arises our second problem. CMOVE moves a specified 
quantity of bytes from low memory to high memory. But v^t if you want to go 
the other way around? Well, define a new word, of course! 

The new word will be <CMDVE, which is included in some versions of FORTH. 
But wait — isn't it rather a hassle havii^ to remember which word to use? Of 
course it is I Remember, FCKTH is esctensible, and we can make it as user- 
friendly as we like! Ihe next new wrd will be CMOVE$, which decides which way 
the string is moving, and does the moving for you. 

Here is an exanple of using CMDVE$ and PAD: 

VARIABLE DRESSER 8 ALLOT 

DRESSER 10 BLANKS 

PAD 10 ACCEPT _SOCKS__ 

. 

. (string processing done here) 
. 

PAD COUNT (get addr and length) 

1+ SWAP 1- SWAP (PAD-1 CNTfl) 

DRESSER SWAP (PAD-1 DRESSER CNT+l) 

DRESSER COUNT TYPE 

Everything should make sense until you get to the 1+ SWAP 1- SWAP. The 
reasoning is a little hcurd to grasp at first: we want to move SOCKS from PAD to 
DRESSER. We also want to maintain that ever-inportant count byte. But \(*ien we 
use PAD COUOT, only have the addr and length of the string itself, not 
including the count. So we OQn|)ensate. Add 1 to the count (because we want to 
move the count byte adong with the string), then subtract one from the address. 
COUNT adds 1 to the address, so we have to correct this to catch the count. 
Once these two nunnbers have been corrected to catch the count byte, shift 
things around to get everything ready for CM3VE$. To better illustrate this, 
here is a diagram of PAD: 
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|5|s|0|c|k|s| I I I I (Contents of PAD) 



PAD+1 (Itiis is vAiere you are iising PAD CXXJNT) 

PAD (Biis is where you are using PAD COUNT 1+ SWAP 1- SWAP) 

If you can understand the principle of the count byte, and how to keep 
the co\mt byte tacked on to the string \*ien moved, then a mjor obstacle in 
writing in PORIH has been removed. Next time, I will discuss string arrays, 
llitil then, e^riment, and Ke^ On PQEOHin' I 

SlMIARy OF RESIDENT WC^DS - 



VARIABLE (n— ) 

ALLOT (n— ) 

BLANKS (addr n— ) 

EXPECT (addr n — ) 

COUNT (addr—) 

CMOVE (adrl adr2 

PAD (— adr) 

NEW VgORDS 



Create a variable. 
Reserves n bytes in the dictionary. 
Fills n bytes with blanks. 
Waits for input; stores string at addr. 
Returns addr and count of a string. 
n)Moves n bytes frcxn adrl to adr2, from low to 
high memory. 

Tarporary storage place for strings. 



: PICK ( nl — n2) 

2 * SP@ + @ ; 
( Cc^ies nlth number to top of stack) 



: LBN (addr — n) 

255 ( string max=255 characters) 
DO 

DUP I + C@ 

0= IF ( looks for null) 

I LEAVE ( I=length of string) 
BNDIF 
LOOP 

SWAP IMP ; 
( Retiims the length of a string at addr.) 
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: AC5CEPT ( adcSr n 



— ) 



OVER 1+ DUP ROT 

EXPECT 

LEN 

SN?VP CI ; 



( adr+1 ) 



( length of string) 

( store count byte at addr ) 



( Wcdts for input; stores count at addr and string 

starting) 

( at adr+1.) 
****** 

: <CMDVE ( adrl adr2 n) 

DUP ROT + SWAP ROT 

1-DCJP ROT + 

DO 

1- I C@ OVER CI -1 
+IiOOP 
DROP ; 

( Moves n bytes frcxn adrl to adr2, from high to low menory. ) 
****** 

: CM)VE$ (adrl adr2 n) 

OVER 4 PICK > 
IF <CM3VE 
ELSE CM3VE 
ENDIF ; 

( Moves n bytes from adrl to adr2; automatically decides on) 
( direction.) 



Forth Tutorial 2 
by Warren Agee 
Oxtpuserve ID 70277,2063 

AN ARRAY OF STRINGS 

last tiite we net, I covered how to handle the basic string in FORTH. I 
€dso stressed the inportance of the count byte and how to move it along with 
the string. Now, we have graduated to the realm of string arrays, vMch is an 
entirely new mess with which to work. 

Blink of a string array as a super-long string. Since the character 
(or bytes) of a string sit sequentially in inanory, it stands to reason that 
the elements in a string array do also. But the physical structure of an 
array must be forced by the programner; maintaining an array is not 
autcmaticedly done. The structure is v*iat we will discuss first. 

Here is a possible string array: 



|3|c|A|T| |3|D|o|G| | | |4|b|i|r|d|5|p|o|o|c|h| 



Kiis array has 4 elements: CAT, DOG, BIRD, and POOCH. Fine, right? No way! 
Tttiis is a mess! Each element in this array has a different length. Elonent #1 
has 5 bytes, #2 has 7, #3 has 5, and #4 has 6. How in the world are you going 
to keep track of all this? You cannot! Elements in a string array - must - 
have a constant length. A much better way to construct the above array is 
like this: 



#3|C|A|T| I #3|D|0|G| | #4 1 B|I I R|D I J>5 1 P|0 1 Oj ^ 

Note: from now on, the boundaries between elements will be pound (#) signs. 
Itow each element is exactly 6 bytes long. Remesmber, the actual strings in an 
array can have variable length, but each element has to have the same - 
maxijnum - length. If the string is shorter than the maximum, then blanks 
will fill the excess space. 

So much for structure and theory. How do we go about achieving this 
neat and tidy array? Wfell, start out with good old' VARIABLE. Remember, 
arrays (string CH numeric) are just stretched-out variables. Think of a good 
name, let's say PETS. Now, decide how many elements this array is going to 
contain. Let's say 20. Now decide the maximum lesngth of the elements. Let's 
ke^ it at 6. Remember to allow enough room for the count byte for each 
element! This sequence will then create our array: 

VARIABLE PETS 

60 ALLOT (10 elements X 6 bytes each) 

TSiat's it! Easy, eh? Actually, you can think of the 60 ALLOT as a DIM 
statement in BASIC. It reserves memory for the array. The hard part is 
accessing the individual elements. Also notice that I totally ignored the 
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initial two bytes v^ch VT^RIABLE automatically reserves; v*ien dealing with 
large arrays, the first two bytes are insignificant and may be ignored. This 
makes for much better readability when going over your program 
listings. 

Now refer back to my diagram of the PETTS array. The first box of the 
array is the address provided by PEHS. Since the first element has a count 
byte, siitply t^ing in PETS OCXJNT T^PE will print out "CAT". But how do you 
get at the rest of the array? You have to calculate the address of the 
element r using this sinple formula: 

base addr + (element # * length of each element) 

Bie base addr is PETTS. Now, as with most of FQRra, elenent numbers start at 
zero. Let's say you want the first element using this formula. Plug in the 
values: base addr=TEST, element #=0, length=6. 6 * = 0, so you are adding 
to the base addr to fii^ the first element. That makes sense! Sinnilarly, to 
get to the second element, the sequence to type in is (TEST 16*+). What 
you are actually doing is adding an offset to the base address. Once you 
have the address of the element, a siitple COUNT TYPE will print the 
contents, providing you stored the count byte! If you want to view all the 
elements in PETTS, type in: 

: 00 10 DO CR PETS I 6 * + COUNT T^PE LOOP ; 

Since element #s start at zero, ws want to print out elonents 0-9. However, 
you mast eLLways add 1 to the \:pper limit whenever using DO LOOPs in FORTH. 

As you can imagine, if you have a lot of string arrays, you will need to 
make these cedculations often. To make it more readable (and more convenient), 
we can easily turn that into a definition, as follows: 

: PETSO PETS SWAP 6 * + ; 

: GO 10 DO CR I PErS( ) COUNT TYPE ; 

Hhis is MUCH easier to read than before. As a naming convention, I use the ( ) 
symbol to indicate that PETS is an "indexing" word; all it requires on the 
stack is the index, or eletient #. A vrord of wsoniing: When you are using DO 
LOOPS, the word "I" must used in the same definition as the loop itself. You 
cannot put the "I" in the definition of PETS( ) ; it MUST appear in the same 
definition as the DO LOOP. Itiis problem is actually a blessing in disguise. 
Since we removed the "I" from PETPSO, we are free to use the index word outside 
of the loop. In other words, if all I needed was the last element of the array, 
I could just type in 9 PETS( ) COUNT TYPE. No loop is needed! 

JJp till now, all you have done is sit back with your arms folded and 
watdi me babble on about accessing an array. Here's your chance to follow along 
with me as I show you how to store things in your array. First we will use 
ACCEPT and input the strings directly into the dictionary, then we will modify 
our routine so we first input into PAD. First of all, \fe have to mDdify our 
array a bit. In the above exarnple, POOCH barely fit into the space allot for it- 
-6 chcuracters. If we are to use ACCEPT (which was defined in the previous 
tutorial) and input directly into the array, ws need to tack on 2 more bytes 
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for each elerosnt. You see, ACCEPT (and EXPECT) always glue 2 nulls onto the end 
of each string. So if you input a string exactly 6 characters long directly 
into PETS, ACCEPT will over-write the next element with nulls! With this in 
mind, here is the cooplete routine: 

VARIABLE PETS 

80 ALLOT (10 items * (6+2) bytes each) 

P ETS 8 BLANKS 

: PEISO PEJTS SWAP 8 * + ; 

: INPOT-IT 

10 DO I PETTSO ( addr of each element) 
6 ACCEPT ( max. len for each string=6) 
LOOP ; 
: PRIOT-IT 

10 DO I PErrs( ) oouot tope 

LOOP ; 

If you ha\7e been following since the first installment in this series, the 
mechanics of this loop are self-explanatory. 

This is fine, bat remeittoer what I said about avoiding inputting directly 
into the array? To avoid those dam blanks fran creeping in. Input the string 
into PAD first, then move than into the array. Here is the new routine: 
(remeittoer to FCMSST PETS first): 

VARIABLE PETS 60 ALLOT (10 items + 6 bytes) 

PETS 60 BLANKS 

: PETTSO PETS SWAP 8 * + ; 

: INPOT-IT 

10 DO PAD 6 ACCEPT 

PAD COUNT 1+ SWAP 1- SWAP 

I PETSO (Get addr of element #1) 

SWAP ( source addr,dest. addr, cnt) 

CM3VE$ LOOP ( CMOfVE$ was defined in the previous) 

{ tutorial ) 

: PRIMT-IT 
10 DO CR I PETS( ) COUNT T^PE LOOP ; 

'Bne PAD COUNT 1+ . . . sequence seems confusing, but if you read ity last 
tutorisd, you should remember it. We want to move not only the string, but the 
count byte as \f^ll. But PAD COUNT returns the address of the string itself, 
along vdth its length. Subtracting 1 backs up the addr to the count byte; 
meazTMhile, add 1 to the cnt on the stack so CMGVE$ will move the entire 
string+cnt. Also remember that I PETSO just returns the proper address of the 
element in the array; a similar sequence in BASIC woiild be: 

100 FOR 1=1 TO 10 :: INPOT PEr$(I) :: NEXT I. 

Well, I've run out of room for this issue. Nesct time I will introduce 
some string eurray utility words which will adlow you to do some heavy-duty 
string processing! Bye for now! 
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Forth Tutoricil 3 
by Warren Agee 
Conpuserve ID 70277,2063 

Beyond the Basic String 

In the past, we have looked at the basic string, how it sits in msnory, and 
the basic string array, and how it sits in memory. We've learned how to store a 
string, retrieve it, and print it. Where do go from here? Well, hopefully 
you have been playing auround on your own vd.th strings, adong with some of the 
new words I presented (like ACCEPT). From now on, things are going get a bit 
more advanced, and the knowledge gained (hopefully! ) from the first two 
tutorials is iitportant. In this tutorial, I will be presenting some very useful 
and powerful string utilities that I have collected from countless sources; 
some of them I have written myself. 

Some terminology, first: a BASE STRING is a string to which you vfant to do 
some sort of manipulating. A SUBSTEONS is a separate string from the base 
string. You usually use it as a reference. For exanple, if we were to delete 
the word FOX from the sentence THE QUICK BRCWN FOX, the sentence would be the 
base string, and FOX would be the substring. Also note that the utilities 
presented here work only with single strings and NOT string arrays. These words 
are INS$, DEL$, and -MATCH. First of all, let's say we reserve memory for a 100- 
byte long string called TEST$. We also have another string called SIB$. Here 
are the contents of these strings: 



|22|n|o|w| |i|s| |t|i|m|e| |f|o|r| |d|i|n|n|e|r| 



|3|T|H|E| 



(You can use ACCEPT and type in the above if you want to follow along) . 

Notice that the first string is NOT an array, merely a long string which 
h^jpens to be a sentence. The 22 is the count byte. Itofortunately, we seem to 
have a word missing! What to do? At the end of this tutoried is a definition 
for INS$, which will insert a "substring" into a "base" string. The stack 
argisnents correspond as follows: 

INSERr$ ( adrl nl adr2 n2 adrS — ) 

adrl — > address of base string 
nl — > length of base string 
adr2 — > address of substring 
n2 — > length of substring 
adrS — > address of insertion point 

So, using the above strings, assume that the word "THE" (the word that is 
missing) is located at SUB$. (Remember that variable names just supply an 
♦address*, which is what we need for INSERT$ to work) . Now to insert THE into 
the sentence, do the following: 
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TEST$ COUNT ( adrl nl) 

SUB$ COUNT ( adr2 n2) 

TEST$ 9 + ( point of insertion - addr3) 

INSEE^$ 

Your, string will now look like this: 



|26|n|o|w| |i|s| |t|h|e| |t|i|m|e| |f|o|r| |d|i|n|n|e|r| 



Esperiinent with INS$ until you becone comfortable with it; use the 
previously defined ACCEPT to store a long string at one location, and a 
substring to insert at another location. Just reroeraber that YOU have to supply 
the location, or address, of the insertion point. 

-MATCH 

Now HEE^E is an interesting word! -MATCH looks for a matching string and 
returns a 1 if no string is found, and a zero (0) if it is found. Additionally, 
-MATCH also leave the address of the byte AFTER the match. It requires four 
stack argistients: the address of the base string and its length, and the address 
substring and its length. -MATCH tries to find an occurrence of the siabstring 
in the base string. TMs word is useful in conjunction with INS$ above. Here is 
one possibility using INS$ and -MATCH. Say you want to insert the word after 
the word FOR in the above string (TEST$). It might go something like this: 

: GO 

PAD 3 ACCEPT JTHE^ (Word to search for) 

Note: anything that appears between uncterscores (_) is 
to be t^ped in as a response to ACCEPT.) 
TEST$ COUNT (Addr & cnt of bcise string) 

PAD COUNT (Addr & cnt of substring) 

-MATCH (stack: adrS flag) 

IF {1^=00 match) 

raOP Not four^!" 
ELSE (else found; adrS is left on stack) 

CR ENTER NEW W3RD:" 

PAD 10 ACCEPT _My_ (Word to insert) 

TEST$ COUNT (Addr & cnt of base string) 

PAD COUNT (Addr & cnt of substring) 

5 ROLL (Bring up adrS whicih was left by -MATCH; this is the 

insertion point) 

INSERT$ 

GR CR TBST$ COUNT TYPE (Displays new string) 
BNDIF ; 



Please note that ROLL does not exist in the standard TI FORTH dictionary and 
most be defined separately. Ttot definition appears at the end of this article. 



DEL$ 

Finally, W5 csome to DEL$, vghich, by no surprise, deletes a siibstring. It 
works €dong the sane lines as INS$; the stack arguffients require the address and 
length of the base string and the substring. DEn:j$ searches the bcise string, 
looking for a match with the substring. It acccnplishes this by using -MATCH, 
explained above. Onoe it finds a match, it deletes the string. If no match is 
found, it clears the stack and exits, no harm done. If you plan to \ise DEL$ in 
a program, you may want to modify it a bit. With -MATCH, you can test to see if 
a matcii is found. Perhaps you want to do the same with DEIi$. You cjould very 
easily leave a 1 on the stack if the string was found and deleted, or leave a 
zero if no match wsis found. Examine the ccmnnsnts for the listing of DEL$ to 
demonstrate hew to do this. 

Well, that's it folks! FORTH is a powerful language, but it lacks in some 
areas, especially string handling. But the real pcMsr in FCKIH lies in its 
extensibility. As demonstrated here, wb now have a good number of basic string 
utilities which can new become part of our FORIH vocabulcuy of words. Does 
XBASIC have a Ixiilt-in INSERT or DEILETE function for strings? Sure, you can 
simulate it with SBG$, but that is very cliinsy and VERY slew. With a little bit 
of ingenuity, you can make FOEOTi run circles €u:ound most languages without 
sacrificing esise-of-use. Till next time, have fun!! 

DEFINITIONS OF NEW VKM)B 



: ROLL DUP 1 = IF I»OP ELSE DUP 1 DO SWAP R> R> ROT >R >R >R LOOP 1 
DO R> R> R> ROT ROT >R >R SWAP LOOP ENDIF ; 

( NOTE: the following definitions require the word PICK which was defined in an 
earlier curticle in this series.) 

: INSERT$ (adrl nl adr2 n2 adr3 ) 

DUP 6 PICK 6 PICK + 
1+ OVER - 

CVER 5 PICK + SWAP <CM3VE 
OVER 5 ROLL + 5 ROLL 
1- C! SWAP <CMOVE ; 

: «^1ATCH (adrl nl adr2 n2 — adr3 flag) 
SWAP DUP C§ 5 PICK 5 ROLL + 
DUP 1 SWAP 6 PICK -1+7 ROLL 
DO 

3 PICK I ce = 

IF 


6 PICK 1 
DO 

J I + C@ 6 PICK I + C@ 

= NOT 

IF 

DROP 1 LEAVE 

ENDIF 
LOOP 
IF ELSE 

DROP DROP I 4 PICK + 




LEAVE 
BNDIF 
ENDIF 
LOOP 

ROT DROP ROT DROP ROT DROP ; 

: TfEL^ ( adrl nl adr2 n2) 
4 PICK 4 PICK 



4 ROLL 4 PICK -MATCH 
IF (NOT FOUND) 

DROP DROP WOP DROP (clear stack) 

( ) (insert the if you want to leave a flag if not 

when not found) 

ELSE 

DOP 3 PICK - 
5 PICK 5 PICK + 
3 PICK - 1+ CMCNE 
- SWAP 1 - C! 

( 1 ) (insert the 1 if you want to leave a flag if matcdi 



was found) 



ENDIF 



Disk Only Software 
P.O. Box 4170 
Rockvflle, Maryland 20850 

14^0.446^ At the tone, enter 897335 for recortd order nvess^^ Touchtone phone is required. 
Voice information line (301) 340-7179 
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Things They Don't Tell You About The P-System 
by Jerry Coffey 

I put my first P-system together about a year after I bought my TI99/4A 
console for $49.95. In the intervening year I had acquired an expansion 
box, 32K memory, and a "disk memory system". I watched the UCSD 
(actually Sofbech) software prices drop but found the P-code peripheral 
card disappearing from the shelves even faster. Finally I gritted my 
teeth and bought the disks before I found a card to run them. In 
desperation I contacted a TI repair center and talked them into selling 
me a card outright. It was then I discovered how primitive my single 
drive system really was. I had to have another drive or give up the 
whole system as an expensive mistake. In the the years since, I have 
bought and sold a lot of other hardware and with each up upgrade I have 
learned something new about the P-system — both the quirks of third- 
party hardware and the quirks TI designed into the system. 



The first thing you need to know that isn't mend.oned in the manuals is 
the bug in the DFORMAT program — it will not format the second side of 
a disk or in double density even when these options are selected and 
your hardware supports them. (Though, strangely enough, it. will format 
SSSD 80 track disks with the new Myarc Eprom.) Thus: 

* 

* Prepare some formatted disks BEFORE you starr working if you plan to 

* use double density or double sided drives. 
* 

You can use any disk manager program and nam.e the disks anything you 
like since the ?-system does not use the first four sectors of the 
disk. These sectors serve only to interface with the TI system. Other 
versions of the P-system use this space for "bootstrap" routines to get 
the system started — routines that are supplied in ROM by TI. 
Differences between the way the P-system and the host TI system handle 
disks are best understood by looking at the operating sysism. 

OPERATING SYSTEM 

The P-system is not just an implementation of the Pascal language, it is 
a complete operating system. It has its own low-level input/output 
routines in 9900 machine language. The system has its own keyscan that 
supports ALL the ASCII control codes and screen control functions equal 
to many "intelligent" terminals — the system can even be set to use an 
80 column terminal communicating through a serial port. Parallel and 
serial ports are handled just like the TI system. TI even provided an 
example program called MODRS232.TEXT that pokes the correct data into 
the necessary memory locations. The conventions for handling floppy 
disks, on the other hand, are unique. The system does not use the disk 
parameters or the bit-map in sector zero, the pointers in sector 1, or 
the file header space (file identifier blocks) in sectors 2 and 3, but 
it does write data to these sectors in a process known as "zeroing" a 
disk. This process fills the bit map with binary "l"'s (to prevent the 
TI system from overwriting the invisible P-system files), writes a 
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single pointer in sector 1, and writes a header for a pseudofile called 
"PASCAL" in sector 2. Before we look at other tasks performed by the 
ZERO function, we need to understand a few more fundamentals such as 
block structure and the P-system disk directory. 

Blocks 

The P-system recognizes two kinds of I/O devices -- character devices 
(such as printers, modems, and video display consoles) and block 
structured devices (floppy disk, hard disk, or RAM disk devices). A P- 
system block consists of 512 bytes — two TI sectors. Thus disk 
operations read or write pairs of consecutive sectors. A disk file is a 
set of consecutive blocks (that's right, no fractures allowed) — m 
fact an even number of blocks in the case of TEXT files, though other 
types may be even or odd. This scheme imposes some inconveniences but 
also has some distinct advantages. It reduces the number of operations 
involved in disk I/O — no bit map checks or upda-res and a mmxir.um 
number of track seeks in each read or wrice. This speeds up aisK 
operations noticeably. 

Some blocks have soecial functions. TEXT files are stored in "pages" of 
IK (two blocks) each — that is why TEXT files are an even number of 
blocks in length. The actual text is preceded by a "zero page" where 
information used by the Editor is stored. CODE Sles are preceded by a 
single block containing data used at run time. DATA files can be used 
for anythinc else and have no special format. Bad blocks on a disk can 
be marked ^as a aie with the suffix "BAD". Afcsr a disk has been usea 
^or a while, removal and rewrites of files will create unused pocKets of 
space. These can be cleaned up with a housekeeping process callea 
Krunchinc a disk. This Filer command consolidazes the files by reading 
and rewriting them to close up unused blocks, but leaves BAD files 
undisturbed . 

Disk Directory 

The P-system uses a very compacc director\- structure thar consumes only 
4 "blocks (8 sectors) on the disk. There is also an option to use an 
additional 4 blocks for a backup directory in case the main director^^ _ is 
damaaed. Each file entry takes only 26 bytes for a fue name, starting 
block", lencrth in blocks (remember no fractures allowed), a type cooe, 
and the d'ate of creation (coded into 2 bytes). This compares with 256 
bytes per file in the TI system. This data begins in block 2 (sector 4) 
immediately following the 26 bytes that contain the Volume name and 
parameters (similar to TI sector zero data). A copy of the director^' of 
an active volume is maintained and updated in RAM during disk operations 
and written back to disk when the file is closed. During some 
operations — removing a file for example — the system gives you the 
option of changing your mind before the directory is updated. As on 
most systems a file is deleted by erasing its directory entry rather 
than the file itself. 



ZEROing a Disk 



*So -*irow>'^'^ ^aii'^itx)k 3^ a formatted disk into a 

P-system Volume — what happens when you Zero a disk The Zero function 
is in the Filer program, the most-used system program after the Command 
processor <the part of SYSTEM. PASCAL that calls other system programs) . 
The zero function prompts for a volume name and size in blocks. The 
size sets the limit on blocks that the system will access , birt: if it is 
larger than the number of physical blocks actually on the disk, the 
missing blocks will generate errors when you attempt to read or write to 
them. Whatever size you choose the entire bit map will be filled in, so 
unused sectors are still not available to the TI system. (More on this 
later.) Once these data are entered, the Zero function checks other 
drives for the same volume name, fills the bitmap, writes the PASCAL 
pseudofile header, then writes the name, size, date, and an end of 
directory marker into block 2 (and also into block 6 if the duplicate 
directory option is used). From this point on, any previous TI or P- 
system directory data on the disk becomes inaccessible and the system 
treats the remaining blocks on the disk as if they were empty. 

THE SYSTEM FILES 

Now that you know a few of the chores necessary to get started, lets 
look at what the system does for you. The P-system contains a number of 
special programs : SYSTEM . PASCAL , SYSTEM . FILER , SYSTEM . EDITOR , 
SYSTEM . COMPILER , SYSTEM . ASSMBLER , SYSTEM . LINKER , SYSTEM . LIBRARY , and 
SYSTEM. SYNTAX. All except the last are code files but do not carry the 
".CODE" suffix required for user generated code files. Most of 
SYSTEM. PASCAL is supplied by TI in ROM along with data files to set 
system parameters, e.g. console or terminal conS.guration, and define 
the the character set. If files named SYSTEM. MISCINFO and SYSTEM. CHARAC 
are present on the boot disk, they are automatically read at boot up and 
replace the data supplied from ROM. If the short SYSTEM. PASCAL disk 
file is present, ±t is merged with the main program from ROM to provide 
a welcome message and textual error messages in lieu of the ROM error 
codes. 

Boot Sequence 

When your TI99 is turned on or reset with the P-code card on, the system 
monitor will try to boot the P-system unless it is told not to — 
literally — it looks for the word "NO" (ASCII codes 78,79) at integer 
address 14586. If these values are not found the roiitines in the P-code 
ROM are loaded and begin execution. (When you Halt the P-system, these 
values are replaced at that address.) The program writes system tables 
into RAM and then polls the disk drives both to determine which are "on- 
line" (i.e. have a disk in them) and to locate all the SYSTEM files. 
When this is complete, the welcome message is displayed and the program 
SYSTEM. STARTUP is executed if available. When this program (or any 
other) finishes, control is returned to SYSTEM. PASCAL which displays a 
"command line" showing the prompts for the single character system 
commands. Some of these commands are in SYSTEM. PASCAL (ROM), but the 
more elaborate ones, such as E)dit, F)iler, and Oompile, call other 
programs that overwrite SYSTEM. PASCAL in memory. In fact some are so 
long that parts of them are paged into memory only when needed using the 
P-system 's automatic memory management routines (the system ;ises 



"virtual" memory to overcome RAM limits — it was DESIGNED for small 
systems ) . 

Rtmning the system 

Now you are ready to write your own Pascal or Assembly Language 
•programs. There are also some public domain or commercial programs and 
a few exotic ones with murky origins and no guarantees. Some users have 
ported versions of a Fortran compiler to the TI, but establishing your 
right to use such a program is tricky, since it is copyrighted and has 
never been released in a TI99 version. I understand that it was ported 
by people who purchased the original for the exclusive purpose of using 
it on the TI. There are also one or more versions of PILOT which was 
under development by TI when they pulled out of the home computer 
market. I've seen one of these which did not look like a finished 
system, but did function. 

The assembler supplied with the system is a Macro-assembler several cuts 
above the version supplied in TI's Editor/Assembler package. My friends 
who work in A/L speak highly of it. The SYSTEM. LIBRARY supplied by TI 
contains precompiled routines to access graphics, sound, and speech 
capabilities of the TI99. The implementation of UCSD Pascal is nearly 
complete and supports program chaining and concurrent processes. 
Running several programs at once slows down execution and must be 
managed by events defined within the programs rather than interrupts, 
but it opens up possibilities not available in other high level 
languages on the TI99. These features coupled with the ability to run 
the system from an 80 column terminal give the TI99 a much more 
sophisticated feel. The ultimate limit is memory — the RAM available 
on the TI requires programming techniques that use lots of paging code 
into memory from disk, thus slowing down execxxtion. 

Public Domain Software 

In spits of memory limitations, some excellent programs have been 
written by users. Perhaps the most sophisticated are those from Andy 
Cooper, particularly his terminal emulator and his GPL Disassembler. 
There are now several disassemblers for GPL, available or "in the 
works", bxit Andy's was available two years ago! The terminal emulator 
is in its second major version with some enhancements that Andy 
graciously added to solve some problems I had using my TI as a high 
speed terminal for a Pascal Microengine. Dave Ramsey and Mike Lambert 
of the Mid-Atlantic Ninety NinERS DG have written many useful programs 
including character sets, a memory reader (PEEKIN) and various 
utilities. Everyone has some version of the FASTBACK doner — mine is 
modified to handle all formats including 80 track — in fact it is 
presently the only program I know that will done an 80 track disk. 
Mike King, whom I haven't met, sdved the problem of importing DV80 text 
into the P-system TEXT format. And if you want a veritable sea of 
Pascal code, join USDS the UCSD Pascal user group and you can access the 
seven megabyte member library, most of which has never been adapted for 
the TI P-system. 
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COMMUNICATIONS 



Communications was one area TI and the developers of the P-system left 
alone r and for very good reasons. High performance communications 
software — terminal emulators for example — usually require native 
machine code for critical portions to assure adequate speed. REMTALK 
was an early program written in Pascal to establish remote links between 
two computers / but it is too slow for day-to-day use and must be running 
on both machines (i.e. it only communicates with itself). Nevertheless, 
it was and is used to transfer files between different machines running 
the P-system. 

Andy Cooper changed all this for the TI99/4A with his terminal emxilator 
TEP. Here was an efficient communications program for the TI P-system, 
with machine language modules running from a Pascal host program. But 
the best news was its capability for binary transfers using the XMODEM 
(checksum) protocol. This made it possible to transfer both CODE and 
TEXT format files between Tl99's running the P-system or to bulletin 
boards with XMODEM (checksum) capability. Andy wrote TEP to encourage 
scattered P-system owners to trade files. For those of us struggling 
with the system r it was the same kind of breakthrough as Paul Charlton's 
XMODEM program on the TI Forum. It also shared a common frustration of 
fixst-time XMODEM users — how do you download the more sophisticated 
program when all you have is the TE2 package supplied by TI? Paul 
supplied XMODEM in a form which could be captured as an ASCII file and 
run from Extended Basic, but capturing a P-system CODE file (TEP) was 
not so easy. There are utilities in the P-system that make it possible , 
but they are a bit tricky for the novice. 

When Andy uploaded a P-system TEXT file describing his scheme for 
converting the TI controller to 80 track operation^ the frustration on 
the TI Forum was almost palpable. The description of the file aroused 
enormous interest but the only people who could read it were those with 
BOTH the P-system and TEP. After listening to complaints and confusion 
for several days, I cobbled up a slow, crude XB program called PASTRN to 
convert P-TEXT to the standard TI DV80 format. The next day Andy Cooper 
came back with an elegant rewrite of the XBasic that provided a 4X 
improvement in speed. Working independently, Andy Dessoff wrote an 
assembly language routine which he called PSCAN to perform the critical 
but slow character handling operations. At the end of that week I 
combined PSCAN and the XBasic host program using Todd Kaplan's XBALSAVE 
technique so that the XBasic and machine language could be saved in a 
single file that loads and executes very quickly. And that's how the 
TI99 commiinity got its first Pascal text file translator. 

This still didn't solve the problem of downloading TEP without TEP. I 
took another crack at this one while working with Phil Symerly to get 
Pascal downloads onto the new hard-disk for his Washington DC BBS. The 
scheme involved a utility I called PAS>TI (inspired by a program written 
for the APPLE by my friend Tom Wotecki) that read the hidden files on a 
P-system disk and wrote exact DF128 images that were recognized by the 
TI system as individual files. Converting downloads back to P-system 
format stiU involved using the RECOVER utility and the Filer's "Make" 
command. The process was tedious but the DF128 files could be 
transferred with any binary protocol including TE2. We set this up on 



the DC board and Bill Byrne picked it up for the Wichita TIBBS using TE2 
only. Of course the first files we put on the board were TEP and its 
docs. 

It would be months before any further help would be available for novice 
users f but the TI Forum and some BBS's began to build their libraries of 
Pascal programs. The next step depended on a new program and an old one 
rediscovered. The new one was a utility (SPLITP) that I wrote to split 
up the space on a disk between a P-system volume and normal TI files. I 
used it to boot either the P-system or Extended Basic from the same 
disk, but it also made it easy to set up valid volumes no larger than 
required to hold particular programs. I merged this new one with PASTRN 
and PAS>TI into a single XB program called PUTIL. The old program was 
the remarkable DCOPY which captures all the information on a disk in a 
single IF128 file that can be restored to a perfect done of the 
original disk. In September 1986/ two DCOPY files created from split 
format disks were placed in the TI Forum Data Library. When downloaded 
with any Xmodem terminal emulator and restored with DCOPY the embedded P- 
volumes could be run immediately. One of the programs on both disks, was 
Andy's new 9600 baud version of TEP with full VT52 emulation and other 
improvements . 

ADVENTURES WITH NEW HARDWARE 

The easiest upgrade for the P-system is the addition of a Corcomp double 
density disk controller. It complicates life very little, since there 
are only two disk formats. You can boot the system from single density 
disks and transfer all your files over to the higher capacity format. 
There is no problem reading or writing disks without using TI's sector 
zero data since the hardware senses single or double density (think 
about it — the sectx)r zero byte that indicates double density can only 
be read AFTER the hardware switches to double density! ) Once the density 
is determined the sectx)rs per track is determined. 

If you want to use the faster and more flexible Myarc controller ^ things 
get more complicated. The hardware senses density ^ but the Myarc 
controller uses the data in sector zero to determine whether each track 
contains 16 or 18 sectors. Without this data the default format is 
assumed (16 for the 40 track system and 18 for the 80 track). When I 
got my Myarc card I was satisfied to run in 16 sectx)r f ormat, but when I 
got the 80 track upgrade I had to find a way to use the available 
formats more easily • The answer turned out to be a very simple program 
I called CHECK that used the low-level UNITREAD procedure to read sector 
zero on all active drives. You don't have to do anything with the data - 
- when the controller reads sector zero^ it automatically adjusts to the 
format data for that drive. My SYSTEM. STARTUP program now goes through 
this drill before it sets printer name and serial port. The Corcomp or 
Myarc controllers will access four disk drives ^ but you will find that 
the P-system will not recognize the fourth drive* I think the 
limitation is hard coded into the UNITREAD/UNITWRITE procedures for low- 
level disk I/O. 



By the way, the P-system does not like slow printers — the system times- 
out while waiting for a typical daisy-wheel printer to empty the large 
buffer set up by the Filer for Transfer operations. If you can't afford 
pr in t e r - i:)uffer -^xrr "spooter (or .^.faster printer )r you can write or 
acquire a simple program to send files to the printer line-by-line* 

The next piece of hardware I tried to add was a Myarc 512K Ramdisk — 
and discovered a few more limitations of TI's P-system implementation. 
If you clone a working boot disk to the Ramdisk then set it to emulate 
drive #1 (Unit #4), the system will try to boot from it. Most of the 
boot routine executes without problem until the system polls the drives - 
- the system reads drive #2, then #3, then comes back and reads physical 
drive #1. From this point on it can no longer find the Ramdisk. Again 
I suspect the "UNITREAD procedure works only for the three physical 
drives (something to do with the CRU address). I still have hopes of 
running the Ramdisk as a fourth block-structured device. There is room 
in the system table for units up to 32, but most of the slots are 
empty. When I get some time, I'm going to write a STARTUP program that 
pokes the Ramdisk volume name into Unit #10. Though it may be 
interesting to try it with the fourth physical drive first. Ir sdll 
may not work if the limitation is in UNITREAD, but its worth a try. In 
fact getting a Ram.disk into the system should speed it up significantly 
because of aH the virtual memory operations. 

The latest expansion was to add 80 track drives. This txirned out to be 
a real detective stor^^ I approached it in stages and kept a 40 track 
drive as Unit #4 (the boot drive), but those who switched over 
completely to 80 track drives had their hands full. The following 
message to a frustrated user gives some of the flavor of the search for 
answers: 

"Ralph, 

I think I know what your problem is. As I mentioned on the phone, the ?- 
system at boot up senses only single or double densi-zy from the boot 
disk — other disk parameters are the hardware default (in this case 
the Eprom and DIP switches). What your system is expecdjig is AN 80 
TRACK BOOT DISK! Which you don't have yet because you can't boot the 
system to make one — CATCH 22 eh? That's also why your SSSD master 
disks won't boot either — the system is looking for files in the space 
between tracks. 

But don't despair. The trick with my CHECK program will work if you put 
it on the first track of a 40 track DOUBLE DENSITY disk. The system can 
always find the first 9 sectors of a single densil^ disk or the first 16 
sectors of a double density disk. Since the first 4 sectors are 
reserved for TI-DOS and the next 8 are used by the P-system directory r 
you must use a double density disk to have any space left to put CHECK 
on the first track. Rename CHECK as SYSTEM. STARTUP and it will 
automatically execute at the end of the boot sequence. Then you can 
create a true 80 track boot disk in your other 80 trk drive. 



Don't put any other autoexecute , files (SYSTEM . PASCAL or SYSTEM. CHARAC) 
on your 40 track startup disk — the system can't read them until CHECK 
executes. It wHl try to load SYSTEM. CHARAC but will in fact read bit 
patterns from the wrong sectors as the character definitions — makes 
for an unpredictable display! There is a slight chance that your drives 
will not read from a 40 track disk while in default 80 track mode. If 
this happens, send me a message and I'll make an 80 track boot disk for 
you. 

By the way, the reason I keep a 40 track drive in the first slot is not 
because of P-sys quirks but because some copy protected software crashes 
on 80 track drives. 
Jerry" 

[Ralph called a few days later to tell me it worked and marvel at the 
complexity of the system. I've put together a "universal" boot disk 
that should work with any double density drive/controller configuration - 
- it involves duplicating files read before CHECK is executed during the 
boot process so that the backup copy will be correctly read if the 
"wrong" sector/txack value is used. The next time I open up the box 
I'll switch an 80 track drive into the first slot and test it. Until 
then, happy hacking.] 




"TAKE TIME TO PRETTY UP YOUR PROGRAMS. 
"Pretty Programs Bloom Forever*' 



YOU ARE THE PILOT. Teaching others using your computer 

by Willaim Harms 

Programmed Inquiry Learning or Teaching 

Although I've just spent a few days learning about PILOT, I can really write a 
useful, enjoyable program. This language is EASY. It doesn't have many of the 
capabilities of TI BASIC, but it does have others not found in even TI Extended 
Basic. 

Thomas P. Weithofer sent me the program PILOT 99, and documentation. He 
developed this TI99/4A version with help from Texas Instruments, Cin-Day Users 
Group, and Xavier University professionals. It's copyrighted 1985 by Thomas 
Weithofer and portions of the manual are by permission of Texas Instruments. 
It is a public domain package that cost? one only about $10.00 plus 2 SSSD 
disks. What a great value! [Ed: Thomas Weithofer passsed away at the age of 20 
in early 1986. His gift to the TI community will live on and can be obtained 
from UGN by registering this copy of the book with the bound-in registration 
card in the back of the book.]. 

PILOT was largely created by John A. Starkweather, Ph.D. at UCSF starting in 
1962. In 1973 national standards were developed for the basic commands (only 8) 
and syntax, and now one can get a version of PILOT for most personal 
computers. It was developed on a small computer to be able to function 
completely on a small computer. Dr. Starkweather wrote a short book, which 
I've found to be the perfect guide. It's called, "A User's Guide to PILOT" and 
published by Prentice-Hall, Inc. at Englewood Cliffs, New Jersey 07632. I 
ordered it at the local B. Dalton Bookseller. 

I would evaluate the TI version as one of the best teaching aids available in 
the world of software, since it's easy to write programs and offers most all of 
the features that make a lesson useful and enjoyable. The only feature I would 
like to see added is that of Speech. 

PILOT 99 seems to be written in TI-Forth and thus a program can run pretty 
fast. It shows the power and versility of TI-Forth. While one is thus limited 
to a small program running at one time, one can run programs quickly with each 
drawing needed data from files the other programs have created. 

To use the version of PILOT 99 that I got, you will need TI's Editor/Assembler 
cartridge, expanded memory, a disk system, and a word processor that can create 
display/variable-80 (text) files. You would write the program in the word 
processor just like the big computers/software use , which is nice in some ways 
since with one like Tl-Writer you've got a full screen editor and other useful 
commands available. Then you would fire up the Editor/Assembler and use the 
Load and Run Option, entering DSKn. PILOT. When it is loaded enter the file 
name of the program you created with the word processor. The PILOT 99 software 
will run the program until it finds an error in which case you get an error 
message at that point. Thomas Weithofer says there is also a version one can 
use out of TI Extended Basic. 
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PILOT 99 adds many commands beyond the basic PILOT set. You have all the 
normal TI Extended Basic Sprite Commands, which provide great enjoyment to a 
user and liven the presentation of any subject matter. Thomas has also added 
the Joystick commands, TI's character graphics commands with color, real live 
Bit Map Graphics ie. Draw Circle, and Mass Storage device commands for files 
usage. 

The manual is excellent, all 70 pages of it (on disk). Each command is 
described and an example given in a program context. However, it says that 
data files are Internal Fixed 80 Relative Update, but the file I got when 
writing data out to disk was Display Fixed 80. To help me use the manual I 
created a kind of Table of Contents and Index. 

Bit Map graphics are easy to create and are displayed in the top 2/3rds of the 
screen with the bottom 1/3 reserved for full sized text. In the top 2/3rds 
graphics area you can also display text, but it will be smaller (64 characters 
per line). The" command for Draw Rectangle is: DR: rowl, clml, row2, clm2, ie. 
DR: 50, 50, 100, 100 will draw a rectangle with the top left at position 50,50 and 
the bottom right at 100,100. Then one could use the command "T:Thats a 
rectangle, folks!" to produce the message at the bottom of the screen. Better 
yet, to describe the language, you could ask the computer operator ie. student 
some questions about the rectangle. Here's a really short program to 
illustrate. 

By the way, PILOT doesn't use line numbers. It's like LOGO, LISP, and some 
other advanced languages in this respect. One uses labels and subprogram like 
techniques to structure the program and direct the flow of action. 

R: Remark only - prog, to demo a Q & A. 
IG: 

DR: 50,50,100,75 
TG: 1,5, shape is 50 by 25 units 
T: how hiah is that rectangle? 
A: #A 

M: 50,50 UNITS 

TY: That's perfectly correct 
TN: Nope, thats not just right 
T(#A=25): You were thinking of the WIDTH 
T: press any key to proceed 

R: is for a REMark 

IG: is to Initialize Graphics 

TG: puts the text at row,coluLmn used 

T: is to Type something to the screen. 

(TP: is to Type to Printer) 
A: is to Accept an Answer 

M: is to Match to the following possible strings 

each seperated by a comma 
TY: is to Type only if the previous Match was True 
TN: is to T3^e only if the previous Match was Not-true 
T(#A=25): is to Type only if the expression is True 
(here users answer of 25 would be true) 
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Instead of the TY: and TN: we could have used a command- JM:*LABEL for Jump-on- 

Match to a label. After the *label would come some testing routine that ended 

with an E: command to return the program flow to the line following the 
JM:* label- ' 

We could have used the Match or Jump command- MJ: string-to-match , more . If no 
match is found to the strings in the statement, the program jumps to the next 
M: or MJ: statement. 

User subroutines are invoked with a simple- ••U:*YOUALL" {U:*title). They are 
also ended with the command- E:. Problems can be identified with the PR: 
command, then you can jump to them easily. You can put the Y or the K or the 
conditional expression ie,{#A=25) after any of the basic commands. 

To save that answer to a disk file we would just add a command- Write Answer- 
WA: right after the A: in the program above. . Earlier in the program you would 
have the command to open the file- OF: DSK2 .FILENAME or some other file and 
then later would close the file with- CF:. 

For math you use the C: (Compute command) with the characters <- instead of the 
= sign. For example: C: #F<-86 or C: #E<-#G. The first sets F equal to 88 while 
the second sets E equal to the value of G. All the crher TI numeric operators 
ie. -r are available as are the numeric functions such as TAN for Tangent. 

PILOT is for easy interaction between the computer and the user. A simple 
example of it is: 

T: Enter your name 
A: $A 

T: Enter an adjective ^ 
A: SB ^ 
T: Enter a type of animal 
A: SC 

T: Enter a part of an animal 
A: SD 

T: Enter a color 
A: $E 

CE: (this means Clear-Home the cursor) 
j^. * * * * 

T: $A had a $B SC, 

T: whos $Dr was SE as snow 

T: Everywhere that $A went, the $C 

T: was sure to follow. 

There are many other commands in PILOT 99, but most are just like TI Basic or 
the Sprites in TI Extended Basic. Most are easy to remember and there are oni; 
54 with the 1 or 2 digit code. I've barely scratched the surface in this memo 
of the many ways the commands can be combined to produce a very enjoyable 
interactive session of learning or data collection. Dr. Starkweather 
describes many in his book, 

EXPLORE 

in Harms Way 
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INDEX OF PILOT COmANDS FOR THE T I -991/ A 
PREPARED BY BILL HARHS 



COMflANDS 

REBULAR COnnANDS 

A: Accept 
AS: Accept one char 

C: Compute 

CH: Clear Home 

CS: Compute String 

E: End 

J : Jump 

Jfl: Jump on natch 

ri: Hatch 

fl J : Match or Jump 

PR; Problem 

R: Remark 

T: Type 

TH: Type and Hang 

TP: Type to Printer 

U: User subroutine 

CHARACTER GRAPHICS COtinANDS 



CC 
CP 
HC 
IT 
SN 
TC 
UC 



Character Color 
Character Pattern 
HChar 

I nit. Text node 
Screen color 
Text cursor 
UChar 



SPRITE COntlANDS 



BP 
SA 
SC 
SD 
SB 
SH 
SL 

sn 

SP 

ss 



Braphic Pattern 
Sprites Atouch 
Sprite Color 
Sprite Delete 
Sprites Bone 
Sprite Hit 
Sprite Location 
Sprite Motion 
Sprite Pattern 
Sprite Size 



BIT MAP BRAPHICS 



DC 
DL 
DR 
BC 
IB 
PP 
TB 
UP 



DESC, 

7 
7 
7 
7 
7 
7 
7 
7 
7 
7 
B 
B 

e 

B 
6 
8 
B 

S 
9 
9 
9 
9 
9 
9 
9 

10 
10 
10 
10 
10 
10 
10 
10 
10 
10 
10 



Draul Circle 11 

Draw Line 11 

Draw Rectangle 11 

Braphic Color 11 
Initialire Braphics 11 

Plot Point 11 

Type Braphic 11 

Unplot Point 11 



FILE STATEMENTS 



CF 
OF 
RE 
RF 
UA 
UR 



Close File 
Open File 
Read 

Restore File 



URite 



MISCELLANEOUS 



BU 
EL 
FB 
JS 
LP 
S: 
UH 



Begin While 
End Loop 
Fire Button 
Joystick 
Loop 
Sound 
Uhile 



12 
IE 
IS 
IS 
IS 



Write Answer Buffer IS 



ERROR MESSABES 



IS 

13 
13 
13 
13 
13 
13 
13 
13 

14 



DETAIL 



15 
16 
IB 
SI 
S3 
S7 
35 
36 

13 
4H 
59 
6S 
63 
64 



19 
S2 
3S 
34 
55 
60 
66 



30 
46 
49 
50 
51 

53 
54 
56 
57 



S4 
S5 
SB 
31 
33 
4S 
61 
65 



SO 
41 
45 
4B 
87 
E9 



17 
SS 
SS 
37 
36 
47 
66 



NOTES 
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LOAD INTERRUPT, HOLD and RESET SWITCHES FOR THE TI 99/4A COMPUTER 

by Brian Kirby 
Compuserve ID 70346,1703. 

First, let's describe what each of these switches will do for you and the 
computer : 

LOAD interrupt: The load interrupt, when activated will cause the 
computer to suspend its current operations. Then it will look at a 
specific memory locations that will tell the computer where to go for the 
next set of directions. This switch is useful for several utility type 
programs. You can have a debugger or disassembler loaded in the memory 
along with the program you plan to check. When your running program cuts 
up, you can hit the load interrupt and be put into your debugger 
program. Then you can go see what happened to your program in the 
computers memory. Another use is screen dump routines. You can have a 
utility loaded up in the computer and your program. When you want a copy 
of the screen you hit the load interrupt switch and then the screen dump 
routine takes over and you end up with a hard copy of what was on the 
screen. You can come up with all kinds of utilities for the load 
interrupt switch. 

In specific a load interrupt causes the 9900 cpu to initiate a interrupt 
sequence immediately following the instruction being executed. The 
memory location at >FFFC is used to obtain the vector for the Workspace 
Pointer and the Program Counter. The old Program Counter (PC), Workspace 
Pointer (WP) and the Status Register (ST) are loaded into the new 
workspace and the interrupt mask is set to >0000. Then the program 
execution resumes using the new PC and WP. 

Here is a check, just for grins, that will let you know that the load 
interrupt works. If you have a memory editor type program 
{SBUG,MEMORY+AID, GRAM KRACKER,etc) go into memory location >FFFC and 
change the next four bytes to >83 EO 00 24. The first two bytes are the 
Workspace Pointer OFFFC) and the last two bytes are the Prograim Counter 
(>FFFE). If you do a load interrupt using these changes the computer 
will do a power up reset routine. Another is to set the WP and PC to 
>83C0 and >0900. This is a level one interrupt. When you do it, the 
system will lock up, but you will note all your P-Box cards lights will 
be on except the memory. 

HOLD: The hold does what it implies. It puts the microprocessor on 
hold. It's good for stopping the computer dead in its tracks. Works 
great for games that do not have a pause function. There is times when 
you do not want to use it. The states you do not want to be in are 
Input/Output functions. Mainly, like during a disk read or write or 
initilization routine. I think you can understand why, but if you don't 
know its possible to crash your disk or cause some timing problems during 
a file transfer. Let's not worry about that. The real uses for the 
hold, is so that other devices may access the computer busses without the 
9900 CPU on line. 

Specifically, when the hold is active, it is signaling the CPU that an 
external device, such as another CPU or a DMA device would like to use 
the address and data busses to transfer data to and from memory. The 
9900 goes into the hold state when it has completed its present memory 
cycle. The 9900 then places its address and data buss tranceivers into 
an high impedance 
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state, along with the control lines WE,MEMEM, and DBIN. Then the 9900 
will activate another signal called HOLDA. This is a hold 
acknowledgment. When the hold is removed the processor will return to 
normal . 

After installing the hold switch, it is very easy to test. Just turn it 
on while listing out a program in basic or XB. Try it during a game. 

RESET: Again it resets the computer. It causes the computer to do the 
power up routine. This is great when the computer locks up. You hit the 
reset switch and your back to the title screen. This saves wear and tear 
on your power switch and extends the life of the computers power supply. 
There have been many articles on the reset switch and not all reset 
switches work properly. Let me explain why. First the basic form of the 
reset comes from the cartridge that you plug in the computer. There is a 
line that runs from the GROM port or cartridge port back to the clock 
chip that supplies timing for the whole computer. When the GROM port 
reset line goes low it causes the clock chip to reset and it in turn 
passes a reset on to the CPU and the 9918 VDP and the 9901 CRU chips. If 
you have a Widget this is what they use to reset the computer when you 
put a new cartridge in. But I'm sure you have notice that when you have 
locked up a few times and the reset on the Widget didn't do the job, You 
had to shut the computer off and on to bring it back up. This was due to 
a lockup in the clock chip and it could not pass the reset along. 

First the required parts: 

One push button switch, normally open type, use a micro type if you plan 
to mount it in the console. 

Two lever type switches, normally open, again micro types if for the 
console. 

Three 2.2 uF/16V tatalum capacitors. 

About 4 feet of small gauge wire for hook up. Wirewrap wire is great if 
you mount the switches inside the console. If you want to not drill 
holes in the 

console, buy some ribbon cable and a mini box. 

Open up the console by remove the screws on the bottom of the console. 
Note how the door on the I/O port to the P-Box is installed. Then note 
how the power switch is assembled on the power supply. Remove the screws 
on the power supply board and set the power supply aside. Remove the 
plug from the power supply to the computer board. Note how the plug 
connects. Notice the keyboard and how it connects to the computer. 
Remove the screws that hold the keyboard and remove the keyboard. The 
computer is then removed by taken out the remaining screws that secure 
it. Note its position. Then remove the screws that hold on a shield to 
the I/O port. Note how that connects. Then remove the remaining screws 
that hold the shields on the motherboard. Locate the 9900 chip inside. 
Its the biggest chip and it has 64 pins. On the bottom of the board, 
where no ICs are mounted, locate the CPU chip. We are interested in pins 
4 (LOAD), 6 (RESET) and 64 (HOLD). Solder three wires to these pins and 
mark the wires as to what they are. Be very careful not to splash solder 
or to short out connections while soldering. Bring these wires out thru 
a hole in the shield. If you are going to install switches in the 
console, come out thru a lower hole near the power supply. Reassemble 
the 
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motherboard with its shields and note all the above that was discussed 
while taking it apart. If you are going to mount the switches in the 
console a good place is beside the power supply so the switches stick out 
beside the I/O port. Be sure to mount them so that they do not short to 
the power supply and make sure you will have enough room to mount your 
speech synthesizer. If you are using stand alone devices ^ you may want 
to mount the switches in the rear of the console. Now that you have 
found a location that works, mount the switches and solder one each of 
the three wires to each of the switches. Make sure that the reset line 
goes to the pushbutton. Solder one of the capacitors to each switch 
across the connections. Make sure the positive side of the capacitor is 
connected to the line that goes to the computer. On all of the switches 
run a jumper to the other side that has no connections. Jumper all of 
them together and run one wire back to a ground on the computer. The 
shield is a good ground point. Put the computer back together following 
the reverse of taken it apart. 

If you do not want to drill holes you have several options. First you 
can use ribbon cable and run it out of the rear of the computer to your 
minibox where you can mount your switches. This way if you decide to 
remove the switches you can just unsolder your connections and everything 
will be back to normal. You can also mount the load interrupt switch 
external to the console, by coming off of the I/O port. You can mount 
the switch in the speech synthesizer be connecting one side of the switch 
to edge connector finger number 13 (LOAD) and the other side of the 
switch to pin 21 or 23 or 25 or 27 (all grounds). But you cannot access 
the hold or reset thru the I/O port. They do not make it outside of the 
computer. If you want just a load interrupt, Navarone sells a board that 
goes between the "firehose" and the console and supplies a load 
interrupt. Its about $15. 

pin 6, 9900 CPU, RESET \ 



pin 4, 9900 CPU, LOAD 



pin 64, 9900 CPU, HOLD 



-\ 



o 

o / 



o 



o 
o 



* this is the shield or ground 
connection 
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WHISTLES AND BELLS ARE NICE BUT LIGHTS? 

I've been putting memory in 
consoles and speech synthesizers for 
nearly a year now and can account for 
about 70 such units out there, some of 
them being in very distant and far away 
places. Well, fflC person ( ED rCNASIAN) 
said he^d like to know when his memory 
was functioning, since with the PEB 
unit now removech- there is no flashing 
LED to indicate that the memory is in 
operation. Tve come up with and re- 
fined a pretty "FLASHY" upgrade to the 
console or speech, which will display 
not only the fact that the memory is 
fiffictioning, but exactly which 8K 
block you are in at that instant. 

The drawings to the left of this 
text, will, if you take a few moments 
to study, explain how to install the 
unit inside of ANY console, except the 
very few QI consoles that TI produced. 
( These consoles are Identified by the 
CPU chip being mounted vertically on 
the main board, rather than horizontal- 
ly.) 

I have not included, because of 
space, drawings for the' speech, but the 
same proceedures apply conceptually. 

PARTS LIST: 

- ^out 10" ribbon cable, 
(at least 5 conductor) 

- r of single conductor, 
26 or 2S guage insulated 
wire. 

- (1) 74LS04 cfiip- 

- (4) standard size LEDs or 
what ever size suits you. 

- (1) 330 ohm 1/4 watt 
resistor (or approximate). 

- Phillips screw driver (#2 
tip size), 15 to 3 watt 
qromded solderinq iron, 
thin resin core solder, 
wire cutters/strippers, 
patience. 

After you have gathered the above 
items, remove the console board, and 
taking the 74LS04 chip in hand, bend 
tne pins, 1 thru 6, and 8 thru" 13 out 
so they are on a flat plane 180 DEB. 
in reference to each orher. Now snip 
the smaller extensions of ALL oins off. 

Set the chip down on the U5t€ chip 
as shown in the drawings to the left, 
and solder pins 7 and 14 to the cor- 
responding two pins on the U508 chip. 
You may desire to put a drop of super 
glue on the top of the bottom chip, and 
hold the new chip (TOP* CHIP) on in'tne 
correct position for awhile. This makes 
the two chips a very firm pair. 

Now iusl wire as shown in the wire 
list on the left and mount your LEDs. 

BY 1¥E WAY you dOT't need memory in 
yoir console or speech -for this modif- 
ication to work, it will work for any 
33: even if in the PEB! !!! 

YOU DO ACCEPT FULL RESPONSIBILITY 
IF YOU DESTROY YOU^' COt^SOLE! ! ! 

HAVE 
FUN 

JOHW F> WILLFORTH 
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MX -RESOL-UTIOM 
MOMZ XOR 



Technical Talk 



col l«ctlen 
and aJvo 
R«volut Ion 



»xp«nd»d my 
of 99/4A*s to 2 
havlns an eld Mi- 
llion I tor an 



y-Ray Had lea I 
I dacidac' to 
black and nhita 
tha •V* aignal, on 
of 32»i i J201 
«ocVat that faada 
VHF podulator ). 
•I9nal contains 



nacaasary 
lavala 

monitor. 



aync. 

to run 



T.V. ayataw. 
connact tba 
monitor to 
tha sockat 
ia tha 6 pin 
tha UHF or 
Tha -Y- 
all tha 
li luminanca 
a monochroma 



Modification complatad, I waa 
confronted with a good 

picture that Mould not 
atay aynchroniaad . Rolling 
vertical iv or horizontally 
with the allghteat change In 
PIttwre content . 

On examination of my UHF 
modulator X noted that the 
•v connection doea not 



correspond 
d tagram. 
plug J201 
Ing table 
stable 



with the circuit 
Reconnec 1 1 ng the 
aa per the fol low- 
produced a good 
picture. 

J201 



cct. diagru 



; I correct 
\ connection 



1 « ♦I2v 

2 s R-Y 

3 s Audio 

4 » Y 

5 = B-Y 

6 s BrcHind 



1 = ♦12v 
2« Y 

3 = R-Y 

4 « B-Y 

5 = Audio 
b s Ground 




C AL.L. A COL.OR 
A COL-OUR 

or 

The HI -Resolution Sequel 



The sequel to the HI -Res. 
Monitor article came some 
3-4 months after the 
conversion. 

Whilst busily working on a 
program, I came across one 
of those ■ Software • faults 



that 
else 



T.I. 
haa 



missed 
missed. 



I( everyone 



I was using the CALL COLOR 
subprogram. It would juat 
not work. The picture atayed 
Cyan regardless. 
You guessed It! Monochrome 
Hon 1 tor . 

Well my face changed colour 
even If the picture didn't ! 

Steve Wl Iklnaon 



F»iRoaecT 

from Channel 99 Hamilton UO 
by Oavid Storey 

X have been asked by several 
people why is It that tha auto 
fire add on for the Atari does 
not work on the TX 99/4A. Well 
tha 99 does not have any voltage 
output at the joystick port. It 
•also has to have a physical 
contact making and breaking for 
the fire button to work. 

This prompted me to come up with 
this simple circuit. It uses a 
595 timer and a relay. Rl and PI 
deal with the time constant. 
ThiB circuit worka well although 
It ia a bare bonaa circuit and 
could be modified to give more 
range of firing speed but, X 
will leave that up to you. Here 
Is the circuit, you will need a 
battery. I used a 9 volt as It 
la compact. This circuit as is 
will run with voltages from 4 
volts to 15 volts. 




Rear view of plug. 

Plugs are easily obtainable 
from Atkins Carlyle. Plug 
type is DP6, cost •1.86. 

# This is true for the PAL 
99/4A*s but may not be valid 

for the NTSC version. 

Remember that you wl 1 1 need 

ar. Audic ronnection alao, If 
^ • joir.c te havp the 

dulcet toneft, to remind you 
that you have just " BAD 
VALUE "'ed again. 

5tvV«- %^ i I k : r.»c;ri 



4V-tgVy ♦V 



nc 



I 



Rl 



Ruto fir* drawing. 
D. STOREY. 



Rl»in«« . 
Pt>lM*9 lln 

R*la«-e31Ci 9ip 
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To Joystick 
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Cpenini! Lp Teur liardware 



SK MEMORY 



Here's an article that tells how to go about placing 32K memory expansion inside your 
speech synthesizer, stand alone disk controller, etc. I think placing the 32K in the 
speech box is a better place than the console. 
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32 KiloByce MEMORY EXPANSION 
FOR INSIDE THE SPEECH 
SYNTHESIZER ( OR ANY 
PLACE YOU WANT TO PUT 
IT). 

by JOHN WILLFORTH 
(based on ideas from the 
WESTRAILIA. and the 
CEDAR VALLEY USERS 
GROUPS) 



if 




I have written up several articles on the 
subject of putting 32K of static RAM inside 
of the TI console. I believe that most of the 
information for this came from the WESTERN 
AUSTRALIA U.G., and the work leading to the 
insertion of the same memory into the Speech 
Synthesizer, was done by the CEDAR VALLEY U.G. 

Now I have put memory into both th€- console 
and the Speech Synthesizer. 1 tlioui.;!;' :'i.!t 
there should be no place you couldn't stick it. 
So I just finished putting it into the OLDE 
TI STAND ALONE DISK CONTROLLER ( part of the 
old train ). This made a nice quiet » sort of 
micro-expansion system ( without RS232/PIO) . 
If you already have a full blown system, or 
are just beginning to get int a disk system, 
and realize that you either don*t have the 
funds, or will not need anymore than that just 
described, you should read on. 

The long connector on the left of the 
schematic, represents the large 44-pin conn, 
that is inside the speech synth., or any other 
plug in peripheral ie: Stand-alone Disk Cont.. 
The big difference, however, is that ONLY the 
speech synthesizer carries pins 1,2,43, and 44 
into the unit from the console. Therefore if 
you do decide no put niemory into any other unit 
than the speech synthesizer, I would recommend 
that you wire across that unit, in other words 
you should rur a wire from pin 1 on the console connector to pin I on the output end 
of that- unit, where the 2nd unit from the console might be plugged in, and do the 
same for pins 2, 43, and 44. This will enable you to put the very small speech 
synthesizer out on the end, instead of between the 2 much larger units ( console 
and Disk Controller )• There is only one lead that is involved here that is a must, 
and that is the pin 1, since I have stayed with using the +5 VDC from the console, 
rather than tapping it from the +5 Volt source in the unit where this is installed. 

If you have the documentation on the RAM chip, you may be confused by the reverse 
order of the address lines. DON'T WORRY, just wire the chip up as I have indicated, 
and if you do your part correctly, it will work. I've done nearly 20 of these in- 
stallations in the console and the speech synthesizer, and in a stand alone disk 
controller, and as far as I know, they are all working. If you want the more simple 
Instructions, on how to install, this same memory into your console, ( which is what 
I pVefer ) Just contact me, by sending a stamped , self-addressed envelop, and I 
will send the instructions. Have fun! JOHN WILLFORTH RDtfl BOX 73A JEANNETTE, PA 
15644 , or call after 9:00 PM, (412) 527-6656 
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!jekE.Hii§H!J5IVLil!S!6l:LATlON 
iy Ken Gladyszenski 

Hben installing a pair half height floppy disk drives 
in the peripheral box, extra connectors for both the 
interface and power cables are required for the second drive. 
The interface cable can be handled by adding a 34-pin card 
edge connector (Radio Shack 276-lSi4) to the existing ribbon 
cable (the cable is jUSt barely long enough), or by moving 
all the connectors frot the existing cable and re-installing 
on longer cable. (Orientation to colored stripe is 
tiportant. leproper installation causes orave to ieproperly 
run continuously, but Kith no apparent daoage.l 



«][io&5L5iELflCE«ENT,TiP 

By ken Bladyszeaski 

Mhen a beige keyboard is installed in a black and silver 
:6nsol£, great care eust be used to center the keyboard to 
eliiinate binding of the outer keys. Ron Bmadeo has 



discovered that the overlay strip above the nuiber keys is 
held in a plastic extrusion Hhich is fastened to the coaputer 
Kith double sticky tape. It can be repositioned higher for 
•ore key clearance by filing or sanding the upper corners 
this extrusion and refastening it. 



l!IIB!!*kJl§5.Kl!!L?WILiye?LY 
W Ken iladyszewski 

Nhen 1 bought a case and po«er supply for an external 
disk drive, 1 «as aaazed at ho« siMle and uncotolicated tnc 
poaer supply uas. 1 present the circuit and parts list here 
for those Mnting to build their om, because they alreao^ 
have MSt of the parts. These parts are expensive and total 
121 (without a recowenoed on-off switch and fuse). Setter 
and less expensive cooplete power supplies or these sati 
parts can be purchased froi a surplus house by Mil. Shee- 
•etal enclosures can be obtained siiilarly. Any power suppl' 
with 12 volts K t.5 MIPS om, and 5 volts DC §1.0 AHPS eir. 
should power Mst any single full height drive. 




\ 

3 
Z 
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■COOL IT: Help your steaming TI 99/4A 
run all day long like one 
rel i abl e cool cat . 

While 1 haw© not had a problem with my computer crash i no 
Decause o-F heat, some TI owners have -found that their units oo 
7!r?K Annoyance into a twilight zone o-f gnash i no 

teeth. Since I work my computer- daily -for several hours at a' 
time doing word processing, I was quite concerned about the 
significant heat generated inside the TI/99AA. I thouoht o-f 

tab7rand"h!no i"®' 5°^'"® * °^ "'^ computer 

around Jo wfir^J ""derneath, or moving the study furniture 

These so?ut?«iI ^ computer in -front of the air conditioner. 
Be!fL! K ? inconvenient or uncomfortable, 

idei w!; ^k!L*''?"* conditioner in the winter time? That 

InltJtfl obvious y not very practical. It was time to 
investigate realistic solutions. 

*-n fK^*^'I\*'*"**°"*^^ grounded myself and a Ph i 1 1 i ps screwdr i ver 
electric! y)'"r?*'' 't^^!* i'^^^-'^^^ ^ charge 'out of sJIttc 

^or r lok-i' ^ ^h!rf "'^^'^ hot plate computer 

for iure 1 Un,JJlt^\t ^^^"^^ heating element 

sfSe! G^od ort^f TK ^''^ 'counting screws to peek at the upper 
oosition^H fS ^''^ "^^^ * ^'^ ^^^^l* h**^ sink obviously 

mpf.i^r?"*'"^ through the local Radio Shack store, I noticed a 
• wioing xne ri s printed circu t board power suonlv a 

pur%%:;e"s'L\°:jj"^\'*' shoppi'nrtisrssi;: «ts''" 

and l^^Se^ber p? :t ll^n """tV' '"'^^1'' V^^""'"- ^^^^^^ tch 
■for elQht hours blrLif^^' continuously 
Five mire un"Jru,e?f ^on? °"I>'^=«"^o'^t*t'l >- lukewarm to the touch. 

proble:s^r;^^ roc:i^s::r"s^*:r'o:s! 

mater?arinsLrhTriJ*'r*""/*P°'^**'* ""^^^ ^^nk 

PlIIJ c door fn h ! jff^to^y-stock computer, only to have the 

That report soCr^ed ^1"?"' ' P^'"' overheat and soften, 
with 1 oy!l T? mII! *° ""^ satisfactory solution 

tl^eir c^iuTers ^Uh'th^'Tnr'."'"' "'^*^'"^>' ^'^^ "ot purchase 
«nputers with the intention of perculating coffee! 
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Here is the Radio Shack parts list: 
DESCRIPTION 



Ventilated Metal Chassis 

PC Board Standoffs 

5-pin DIN Plug 

5-pin DIN Chassis Socket 

DPDT Toggle Swi tch 

24 gauge stranded wire, 
two-conductor zip cord 

Small nylon cable ties 

Small panhead sheet metal 
screws and 4-40 machine 
screws, washers, and nuts. 



PART « PPTrc 


270-253 


*4.?9 


270-1391 


.69 


274-006 


1 .49 


274-005 


.59 


275-607 


1 .79 


278-1301 


50'/2.79 


278-1632 


30/1 .59 



I??lrs'''oenc!?\ ^r*":**^ ^ ^'^'^^^ "**dle nose 

l^li:V6Tni;.\Xr:''^^ ^-'^ ^^'^^^ screwdrivers, tin 

oroCrSe rtj.'ior'zr\''nr^ ^^^^^ - PoHi . ' ^Th i r^n 

hole;'!n^t^ :::ie^'Lp^!rb:arr^' *° "^^^^^ ^^^^^"^ 

iLnp^'on'lni^lnl .TT J""' ''''' ^^"^^ ^'^^^ P H ot 

hole for the toQote Uttch ton InH^S^;. ^^'^^il^ ''^^'^^^ «nter 
operate wi thout b ndf^' fr*^ bottow so the switch will 

Job quick y ^nd nlTt\y-' Do ^? L'^T"' ^'^^ ^oes the 

power supply boar^hl^-befn ^nst^n e^d. ""^'^ 

l^ur^'wT?:: oofnrf?!''' °'='^-'^"^-' and record order of 

supply end IVtLZ^J''^^'^- ^""''^^ computer board. P^er 

time. RemoCe two screws In^^"^'" ^""PV*^"^ ''°*'^*=' ^'"^^ 

bend orloinal reS pMot li^f TJL*"^''^'' 1'^°^ computer. Gently 

three corner holes n thl^L c^rtt^r of board. Relieve 

standoffs?%hen dM n bo^tST^i *° *"^P* "^^<=»" 

template s he^ofC t l,^ S*,'^'^***'* to. match. A paper 
^ft! dI nit InJ^a { t?e irV^'^ desired here, not a force 
completed? ViJe til JiL ? ^ is 

Attention to such 2e tans not'^nw' *U "^r"^ ""^'^P •'='^**- 

possible wounds! but it wn^ n! !"^ protects your fingers from 

'ip cord*''%{.'rp'*:„%'?:„"=f"*'- 'fnsth) 24 gauge .tranded 

Identify th. p?„rand ^ ^t-ove four conductor* to 4 pin». 

cover . 

t«n Tine wires before installing the plug 
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h.ri^ lr.^"'tl ^'^^'^ ^" ^'^ *° *° bind the two zip 

cords together into a neat 4-conductor cable. Make a loop in the 

til . .1 ^ '^^^'^^ ^ °P'>' mounted. Bind 

the loop w. th_another ^ylon .cable li.. . now enough lenoth 

' HoT^H^'^fK ''^^^^ unsoldered holes in the main computer 

So^nH Sl^- Solder the four wires into the main 

Z^Zt ^^'C ^SLT^ order. Care+ul examination of the 

' tT^l. ''°*'^'=' board will reveal one o-f the four 

corr!rJ° ^k* S':°"''<='- "^h^t may help keep your connections 

ARE H^ERcSNG^B^r ''.^'^'^ J*^" 1^^^' "^^''^C- ^0 WIRES 

oolifVlfi w ! !: ^^^^ boards, plug, socket, andwirino 

P^ait r iLi "h'^'^"* P'^" '^^li^^ loop on 

Plastic post and secure with original screw and small washer. 

fl"um?nMl^ clearance holes and mounting screw holes in opposite 
pL^e'socker'^hi^^'' I^IN socket and the transformer 

M^!f J u ' ^'^^ be removed -from the power supply board 

cT.Vr ? urso^d'ri'.r^ •^^^^ ^/^^ she'e't'^me?" 

frl^ K ^ ^"^^"^ black, and white transformer wires 

throu^^Se^piii'ir/i"' ^'^^ ""'^^ through the chassis end fr^ . 
the ?^ass?I ..ith i^n clamped the ends of the socket to 

washrrr%l4o'nCtron thrTn% i ^'^^^ °" "^'"^ ^ 

Ind^^^^ol'dn ^" '"^"^^^^^^ stranded 24 gauge Jumper wires; tin 
«hft; pfl ?fnn h^^"'^-^^!^''' '^"''^"^ black, and 

sii; iVA-T, °. I ^"PP'>' bo^rd, from the top 

ontrstindo;]i."*""^°'^'- bottom and gently press'board 

fumnin^**^' ^^"^ toggle switch and pilot lamp. Solder 'red' 
Junner ZZ^ terminal of switch. Solder '^lack' 

termtnar S^^lr' S ' ' °h 1^' ''''' bottom s^^tch 

corrllpo^dino mDD[^ term^ transformer socket to 

socket lead 'u^h?;.- ^^'^"""^Is or power switch. Solder white 

c!p w?ti':^;n w ^: nir%iu?;'a??^ ^^^^ ^^^^^^^^ 

sink Th« Route all wiring clear of black heat 

pi?o; iToht^tpe^r::; s^^^c^i^ '^ ''^ 

glow which does ^ot gfare at'^? ' ^ moderately soft 

Pi'n n^mbers'onTpfn ilN^ Tl**^' ^^^^^^ *° "^'^-ct 

lookino a^ a mi^,.«i - socket, remembering that you are now 

them to ;he socket befirrmlun?"^' J!:' "'^^^'^ soldered 
4-condurtor ^vlon mounting the socket, because I had a 

has soldered Wires'^ ylu°mai :.^^'^*"^''^ board 
-d then solde^^he' :rreno%h%'%^ ug°."°"" ' ^'"^ 



Page 6- 



Out n?Tn ^^^"^ ^?'''' '"''^^ connections throughout your cable" 
^tLlt ^r*"^ ^"P^''' conversions, as care + ul as I tried to-be I 
mfstlKerh.d'H"' ^«"P-ters worked correctly after the ' 

^tn^ ^!^" corrected. But it is still heart stopping, 
^I^Jh J H^ work riQht the first time. Check your groCni to 
.^^undM-rr^ +trst, then verify t+»e^rder of the other wfres 
sffde'^Jr^:?*;"^ anything on. Glue the original pTastic in-Off 
s ide switch in place with rubber cement for appearance sake 
Clater be , ge TI 99/4A only>. install computer'bott^ co"r! 

b^Ick'^fo^^^^P MODIFICATION OF SHEET METAL CHASSIS TOP. The 
a Jminum*^ 'f/**^^' But th* silver chassis bottom is OeRY SO^ 

%h! -~ 'ajictnt to the he»t »ink .nd 

tcrtw! *° '"I *h«t m^tll 
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Anchor Automation Signalman Series Modems 
Interfacing them with the TI 9 9/4 A 
by Scott Darling 
GEnie ID TIKSOFT 



After reading some messages asking for help using Anchor Signalman 
modems. I decided to sit down and write a short tutorial covering them 
all. As this is conjecture on my part, please don't hold me to all I 
am about to expand upon^ as I had to figure out most of this myself. 
As some of you know I operate a BBS, CALTEX #8 in Spokane, Wa. The 
'provider' of the hardware had a Mark VII modem that he had bought as a 
'auto-answer' modem only to find out that one had to write the software 
to activate the modem. That left both of out! So I talked to Anchor 
about the situation And was told for $30 more could get a Mark X. 
So off went the modem and the check! This was in June of '84 and we had 
never seen or heard of the Mark X. But was told it was 'HAYES' 
compatible. So this is were the REAL fun began and I found out all the 
ins and outs! Well onto the nitty-gritty. 

Mark III: This modem needs no explanation as it is a direct connect 
ready to go. Just plug it in and fly! 

Mark VII: This modem is a auto-answer, auto-dialer 300 baud modem. 
The only catch is it is your software driven. Which means you, the 
user, write the program to make it operate! This is a major drawback, 
at least it was for me! But when I found out I had to write the 

software Gulp forget it! But if you find yourself with one 

of these. It is not a problem , it still can be used just like the 
Mark III. 

>»>> EXCEPT<<<<< Now here is the fun part! A wiring change is necessary 
for the hookup to operate the modem. 



RS232 


MODEM 


PIN 1 


1 


2 


3 


3 


2 


6 


6 


7 


7 


20 


20 



The above wiring changes apply ONLY to the Mark VII. 

Mark X: The Mark X is also an Auto-Answer and Auto-Dialer EXCEPT for 

a small detail This one has the ROM software to do what you want. 

Whew! I finally found what I was looking for! At least I thought so. 
So I took it out of the box and plugged it in and of course nothing! 
Because I knew I needed to make the wiring changes. So I decided to 
make up a cable interface so as not to destroy the integrity of the 
modem cable. So after about $10 of solder plugs and hoods I was ready 
to go. Here is the cable makeup that I used: 



Page 6-14 



RS232 



MODEM 



PIN 



1 
2 
3 
5 
7 
20 



1 
3 
2 

20 

7 

5 



8 is DCD 



Because I use pin 8 of the modem for a Copyrighted BBS, I will Leave 
out that connection. Besides it doesn't go to the RS232 port! 

This configuration will and does work everyday. So now I had my cable 
made up and hooked in and was ready to go. Right? Tried to call, 
BBS got a carrier, and played around in it. Logged off and tried 
calling back. Hmmmm no carrier tone but the modem connected me anyway. 

Well to make a very long and frustating experience short, 
I found out the COMMANDS I was sending were not being executed. It was 
starting to get on my nerves at this point. So here is what I found 
to make the modem software perform the commands. The following 
programs are examples: 

These are setup for auto-answer for a BBS! I use these formats on mine. 
When you turn on the modem, these are the defaults that will power up. 

"ATCOF1HOQOV1SO=1S1=OS2=43S3=13S4=10S5=8 ; cr" 

Well as you can see the defaults take care of a lot of different 
fxinctions for you at the onset. But you'll hardly ever use most of 
these. The following are the ones that will be used by most people 
using the modem for a BBS or auto-dialer function. 

This format is what I use to set up my BBS to auto-answer. Of course 
I don't use these exact setting's. I'm using these for an example. 

100 OPEN #1:"RS232" PRINT *1: "ATQlS0=2S2=30 ; cr" 

This tells the modem not to send result codes to the DTE 
(caller end<'Ql'). To answer on the second ring {'S0=2'). And the 
escape code is CHR$(30). This format is used by my BBS while waiting 
for a carrier. Also notice that the command line has no spaces, Mark X 
ignores the spaces, so just leave them out. The Hayes REQUIRES those 
spaces between commands. 

So now your online and running. The next step is when the caller is 
done and hangs up. This next line will open a different file. With the 
LF off (which I normally use in the BBS anyway) 

100 OPEN #2:"RS232.LF" :: FOR A=l TO 1000 :: NEXT A :: FOR A=l TO 3 

PRINT #2:CHR$(30) :: NEXT A :: FOR A=l TO 1000 :: NEXT A 
110 PRINT #l:"ATHSO=0;cr" :: RUN 

This gives a one second delay before and after the escape command. The 
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way I set the escape command evidently gives just enough pause 
between characters. Line 110 is the hangup command to the modem and 
also tells it NOT to answer till told to do so. The reason I use RUN 
is I have turned off pre-scan and my 88 sector program will recycle 
in 10 seconds versus the original 30 before. 

There is one command that will act like turning the modem off, then on 
again. 

100 OPEN #1:"RS232" :: PRINT #l:"ATZ;cr" :: CLOSE #1 

This is the RESET command. It sets the status of the modem to ALL 
the defaults. 

The following is a BASIC program that will write a logon file. I haven't 
figured out how to write a basic program that will logon and CONNECT. 
I think there is a way of doing it. But this one works. 

100 OPEN #1:"DSK1. LOGON", DISPLAY, VARIABLE 80 
110 PRINT #1:"1ATD" 

120 PRINT #1: "IT" OR P FOR PULSE 

130 PRINT #1: "13260515" ( 1 + AREA CODE + NUMBER for long distance) 
140 PRINT #1:"1 " 
150 CLOSE #1 

This will be saved as a file that TEII will load and run from option 2 
or 3. I tried calling CIS using the output of this and it worked. 

MARK XII: As far as I know all of the information for the Mark XII is 
the same as the Mark X. I acquired most of this info from a dealer that 
sells the Mark X. But as he put it "well all of the people that buy the 
Mark XII 's wouldn't call a 300 Baud BBS anyway" so there was very 
little animosity between us! But from I can gather everything should 
be the same. Except one added command for 1200 baud 

To sum up the Anchor commands: the most important part to do is 
the ";cr" as the modem will ignore anything sent till it receives 
that command. If I have caused more confusion than help let me know, 
as I have tried to think out this tutorial. But I could have made a 
mistake. This is my first try at writing( rather obvious I suppose). 
So here's hoping This clears up any confusion. Also, I wouldn't advise 
calling or writing Anchor / as they are really not equipped 
to handle the BASIC language to activate the commands. I know from 
experience. 
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DISK DRIVE POWER SUPPLY 



This ie a break down on how to construct a power supply -for a disk 
drive. The list o-f parts are listed at the bottom, but remember that 
this list does not include the sales tax or the board to construct 
the power supply. If you need help in constructing this power supply 
just give Skip a call at 944-2770 and he will help you out as much a 
possible. 

DISK DRIVE POWER SUPPLY 



!RS2! 



i ## : . 

Fl 



Tl 



-//- 
SI 



Dl 
•>! 



115 
VAC 



= / 



= LI 



D2 

-!< — 



!C1 



!C1 



D3 ! 
-!<-! 



D4 

->! 



+12V 

!C4 



DISK DRIVE HOOKUP 



!RE3i 



ICS 



Z2 
Z2 
E3 



-> +12V 
-> COMM 
-> COMM 
-> +5V 



-0 



-0 



COMM 



-0 +5V 



:name: 



TYPE 



TECHINCAL NAME ! SPART NO. ! ! PRICE 1!QT 



D1-D4 3A IN5402 

C1-C3 2200UF 35V 

C4-C5 lOOUF 35V 

"Tl 18. OCT 2. OA 

P"! 120 VAC 

SI SPST 120 VAC 

LI NE-2H120 VAC 

RS2 +12 VDC 7812 

RS3 +15 VDC 7815 



"BARREL" DIODE 
ELECTROLYTIC CAPACITOR 
ELECTROLYTIC CAPACITOR 
POWER TRANSFORMER 
CIRCUIT BREAKER 
ROCKER SWITCH 
NEON LIGHT 

VOLTAGE REGULATOR IC 
VOLTAGE REGULATOR IC 



276-1143 
272-1020 

272- 1016 

273- 1515 
270-1310 

275- 690 
272-1102 

276- 1771 
276-1772 



* .89 
*2.49 

* .79 
*6.99 
$1.49 
*1.89 
S .69 
*1.59 
S1.59 



(4 

(3 

(2 

( 

( 

( 

( 

( 

( 



TOTAL PRICE FOR PARTS 



> $25.99 
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CABLE BOX 
b'd Jin Edwards 

One feature of the !• 1.99 that has never been hard for me to criticize was 
the physical size and design of the peripheral cable and connector. It 
always seemed to take up an undeserved portion of desk space. With only a 
goal in mind and virtually no "hardware saave", I set out to alleviate the 
problem. It seemed a simple task to build a compact connector that would 
plug in without disturbing the original components. Actually, the most 
difficult aspect of the project was rounding up the parts. 

That proved to be an education. Card edges and their matching connectors 
have several configurations. For est ample* 22/44 means that it has 22 
conductors on both sides. Spacings vary as well: .10, .125, .156, etc. 
This refers to the distance between the centers of the conductors. This 
project requires 44 conductors (22 on a side) with .10 cerftersl Finding a 
card edge connector was difficult enough, but finding the male counterpart 
was impossible. A section was literally cut out of an abandoned board. 

1 found most of the parts at Pacific Radio while the card was found in a card 
boar u boy. at All ElectronicSo Obviously, the exact parts may vary but b& 
certain of the numbe^r of conductors and spacing. Once everything is 
rounded up, simply solder the wires together making sure to match one end 
to the other. Optionally, an interupt switch can be added for those screen 
dump programs that require one. 




-1 UTILITY BOX 
^ 2 CARD EDBE CONNECTOR 



____ 3 STRAIN 



4 BUMPERS 

5 TELEPHONE CABLE 

6 CONNECTOR HOOD 

B\7 CARD EDBE 



# 
1 
2 
3 
4 

cr 

w* 

6 

7 



PART MANUFACTURER 

UTILITY BOX CALRAD 

CARD EDGE CONNECTOR GC ELECTRONICS 

STRAIN 

1/4" BUMPERS RUSSELL IND. 

50 CONDUCTOR TELEPHONE CABLE 
CONNECTOR HOOD GC ELECTRONICS 

CARD EDGE 5CAVANBED FROM PC BOARD 



PT.# 

90^785 

41-875 

REC-207SH 

41-10(33 



COST 
^^2. 10 
:r.4.74 
.25 

2ri.79 

:r2.4S 
*:1.50 
$12.86 
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INSTALLATION OF fiRON CHIPS 
INSIBE THE TI CONSOLE 

by Patrick Ugorcik 
OH-HI-TI 

The cartridge groi chips for lost 
of the TI lodules can be installed 
inside the console so that it is no 
longer necessary to plug the cartridges 
into the groi port. The prograis can 
b€ selected by nay of a snitch attached 
tr the groft chip. This not only saves 
tiae in not having to search for a 
particular cartridge but it also saves 
near and tear on the groa port. 

Like all articles of this type I 
iust first narn everyone that any 
■odifi cation to your console nill void 
any warranty and also the risk you take 
is your omh. If you plan on doing this 
aodification on your only console I 
strongly recoaiend against it. There 
is always a chance, although slii, that 
a disaster light occur. 

Thk' parts you Mill need for this 
project are: 

1) Prograi groi chips either 
purchased froi TI for around 14 
each or taken froi a cartridge. 

2) Ribbon cable (6 inches long, lb 
Mires). 

3) Thin Mire to connect the 
switch. 

4) Switch (The type of SMitch used 
depenos on the application. Kore 
on this later.) 

5) Low wattage solder iron (25 
watt or less), solder, solder bulb 
to reiove groi chips froi lodule 
if used, etc. 

This project requires the reioval 
of the groi extender, the part the 
cartridges plug into, froi the console 
and attach 16 wires to it. The other 
end of the 16 wires are attached to the 
groi chips which are being installed. 
A switch is attached between one of the 
wires so that the prograi can be turned 
on and off. 

Nhat liiits the nuiber of prograis 
which can be installed is the type of 
switch that is used. I have installed 
two prograis into a console (E/A and 
DNII) using a SPDT type switch and see 
no reason why lore cannot be used. One 



criterion for the switch is that it 
lust have an off position so that the 
prograi attached to the groi port can 
be turned off when cartridges are used 
(extended basic for exaiple). If you 
are installing only one prograi then 
any SPST switch will work as long as it 
is siall enough to lount in the 
console. If lore than one prograi is 
being added then a switch with an off 
position is needed. 1 used a SPDT 
on-off-on typ^ switch for ay two 
prograi installation. I have seen 
liniature rotary switches at hai leets 
with as lany as 12 positions. Iiagine 
11 prograis available at the flick of a 
switch. A lini DIP switch could also 
be used but lay not be as convenient to 
operate. 

6i!ii|!eiU09.t!il.E9l!Hli 

1) Reiove the on/off switch piece 
on the black and silver consoles. 

2) Reiove the 7 screws froi the 
bottoi of the console. 

3) Lift the bottoi part of the 
console froi the top portion. 

4) Reiove the 2 screws holding the 
power supply to the console and 
reiove the power supply. 

5) Disconnect the power cable froi 
the power supply r 

6) Reiove the 3 screws holding the 
lotherboard to the console and 
lift the lotherboard up slightly 
so that the keyboard connector can 
be reioved. 

7) Disconnect the keyboard and 
lift the lotherboard out. 

8) Reiove the groi extender froi 
the lotherboard. 

&ie!(:lSl.tb!.6rg|.(hie! 

The groi chips will be 
piggy-backed together to fori a groi 
stack. Pin 14 on each prograi groi 

chip group is attached to the switch 
position so that the different prograis 
can be selected. Soie of the prograis 
use as lany as S groi chips. For 
exaiple Editor/Asseibler uses 1, 
ftultiplan uses 5 and Disk Hanager II 
uses 2. In the case where lore than 
one chip is used, care lust be taken to 



lake sure th^t the chips at 
piggy-backed in the right order or the 
prograi will not function properly. 
This is not too difficult because the 
chips are nuibered in the proper order 
(DHII-C02234NL and CD2235, for 
exaiple). Just lake sure the chips are 
stacked in assending order anc 
everything will work fine. (See figurp 
2 for lore detail.) 

To prepare the groi chips 
installation do the foUoving: 

1) Carefully bend pin 14 on aL 
the groi chips with a needlenose 
pliers. Refer to figure I for 
location of pin 14. 

2) Piggy-back all of the chips 
used laking sure the notches or 
the chips face the saie directior 
and are arranged in the proper 
order as discribed above. H lo'r 
than one prograi is being 
installed keep the groi chir 
groups together. 

3) Solder all of the pins except 
for the pin 14's. Hake sure that 
there are no solder bridges 
between the pins. 

4) Solder the pin 14*5 for each 
prograi group together. Solder r. 
thin, 6 inches long, to each 
prograi group at pin 14. (Sef 
figure 2 for detail.) 

loftiUiUgQ.ei.t!ii.PrMUi.feei.(!!iei 

1) Separate the ribbon cable into 
two pieces, one with 8 wires and 
the other with 7 wires. 

2) Attach the ribbon cable to the 
reiaining IS pins on the groi 
stack. The 8 wire piece is 
attached to pins 1-6 and the 7 
wire piece to pins 9-13, IS and 
16. 

3) The wires attached to pin 14 
are then connected to the switch. 

4) Attach a siall piece of wire 
between the center of the switch 
and pin 29 of the groi extender. 
(Figure 3). 

5) The wires froi pins 1-13, 15 
and 16 of the groi stack are 
attached to the groi extender 
positions indicated in Table A. 

6) Recheck all of the connections. 

7) Nrap the groi stack and wires 
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Mith flectrical tape so thit it 
Mill not short against tht 
•othtrboard'f letal shitlding when 
installtd in the console. 
8) Install the switch in the 
console close to the grot port 
cither on top or in the back. 

lliilllllill.lll.C9lf9ll 

Before reasseibling the console, 
test the prograis installed. Reconnect 
the power supply, keyboard and oonitor 
to the aother board. Hake sure the 
power supply and keyboard are on a 
non-conductive surface before applying 
any power to the console. Turn on the 
console aoo try each of the prograis 
installed to take sure everything is 
working prop«rl>, Aisc check basic and 
the grot port for proper operation. It 
way oe oKessary to reset the console 
(fctr. -) each tiafe i different prograt 
is selectee, ftake sure that tne grot 
stack switch is in the off position 
before inserting any cartridges into 
the groi port. If everything is 
working fine then the console can be 
reasseibled. If a problea occurs 
recheck all your work. 

ynen reisseabiing the console Mk!" 
surf that tn^ -ib&or^ cat-it is o»n: jwi 
of the eay sc tnat the groa port can oe 
reinstalled into the top of the console 
and it does net intr fere with the 
operation of the console. The groe 
stack should be placed to the left sioe 
of the console above the aotherboard. 
Reassewble the console in the reverse 
ffi-der used to disasscrtle it. 

After the console is asseibled 
rechtck it acair tc wake sure 
every:niflg is operating correctly. 

!■: tnerc irt ^ny ^uesiionf about 
this project please feel free tc ask. 
«y address is: 7U7 Uana, Allen Fark, 
HI 4B101. 



1 tir^ — ^ 
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Adding a Second RAM Chip 

This section describes how I added a second RAM chip by piggybacking it or 
top of the first. However, this makes the chip pile high enough so that the 
module cover will not close -over it. Accordingly, I had to remove a small 
section of the top module cover (about 1 by 2 cm.) right at the point where it 
takes a couple of right angle turns. This is where the module narrows so that 
it will fit into the cartridge slot of the console. Since the chips take up 
some of this space, this "souped-up" Supercart needs to reside in a widgit or 
other cartridge expander (it even works well in a BK). To do the actual cutting 
of the module cover, I used an old soldering gun which had a plastic cutting tin 
but I suppose anything from drills to hot wires could be used also. 

The Hitachi HM6264LP-15 is a 28 pin chip of which one pin is not connected, 
two pins are concerned with power supply [ground and +3-5V input), and 21 pins of 
which are address and data lines. This leaves 4 pins left over which control 
the functions of the chip. Pin 27 is the WE or Write Enable pin whicf- 
determines whether the chip will be written to or read from and is controllec 
via the wire connected to edge connector 3; if the voltage to this pin is in - 
high state C + voltage) then the chip's memory will be available to be read frorr 
whereas if it is low (0 voltage or i^rounded) then a write to memory is expected. 
Pin 26 is the CS2 pin which seems to act as a sensor as to whether power 1= 
applied or not; if this CS2 pin is at a low (0 voltage or grounded) state, ther 
none of the chip's memory functions are accessable. This is why it is fed c 
continuous high voltage state via the LED which is connected to the -♦•5V supplv 
from the console Cthe left hand F3 hole connects with pin 26). Pin 22 is the OE 
pin or data bus in and I'm not entirely clear as to its meaning. However i 
this system, if this pin is at a high voltage state, output from the chip ib* 
disabled and if it is at a low state (0 voltage or grounded) then read and writr 
functions can be done. The last of the four control pins is pin 20 or CS 1 o 
chip select pin. When this pin is supplied with a high state (+ voltage) the 
entire chip pretends that it isn't there (it's "deselected"). When this pin is 
at a ] cjv t i v.i .• • I r o n d ; grounded] then it gets the message that it has b e e - 

"selected'' by t^-. e rest of the system to converse with and its functions arp 
enabled. If you look gt- thp inside of a GK or Horizon Ramdisk which both use 
piggybacked 6264LP-15s, you will find pins 20 bent out with individual wireE 
connecting them to the board; this is the way each chip is selected or 
deselected. 

The above paragraph is probably boring and inaccurate but it helps tc 
explain the circuitry necessary to add another RAM chip to the pile. It's 
relatively simple to piggyback another RAM chip on top of the first; bend in the 
pins to make a tight fit over the lower chip's pins by molding on a table top. 
then bend out pins 1, 2, 20, 27, and 28. Then solder the pins from the top chip 
tc the bottom chip being careful not to make a.ny solder bridges between adjacen^ 
pins^ Cin my module, I actually soldered the two together before I installed it 
on the board.) Pin 1 is ignored. Pins 2, 27, and 28 are connected to the same 
wires as supply the corresponding pins on the lower chip. If you connected ail 
of the pins of both chips in parallel, you would have both chips doing the exact 
same thing - clones of each other. How do we give each chip its individuality? 
This is where the CS 1 pins (pin 20) become useful. A "pullup" resistor is usee 
to supply + voltage (a high state) to pin 20 of the chip not being used which aE 
we read in the above paragraph has the effect of making that chip "invisible" to 
the system. In the absence of such a "pullup" resistor and + voltage source, 
these pins would tend to "float" down to a voltage state which would cause the 
system to "select" both chips at once. This would cause the system to read the 
same address of both chips simultaneously which would result in garbage and = 
probable crash. In: the Supercart board, there is a resistor (R1) which acts a- 
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such a 
expanders y 



pullup resistor. In the version described for use in cartridge 
, this R1 resistor is connected between CS1 (pin 20) and the +5V line 
from the console. This supplies a high state to deselect the chip. How then is 
the chip selected to enable it to do it? thing? This is the function of the wire 
connecting pins 20 and 22 (the OE pin). When the OE pin is made a low state (0 
voltage) then pin 20 is also made low since the resistor supplies voltage less 
readily than the direct connection to pin 22 "takes it away". To enable us to 
use both chips independently then, we could use a switch to connect the OE (pin 
22) line to either of the RAM chips pin 20 while having pullup resistors 
connected to both pins 20 to keep the other chip deselected while the one chip 
is working. 

This is exactly what I did: disconnect any wiring between pins 20 and 22 
(to be found on the lower or older chip); next connect 1K resistors (R1 in 
Figure 3) between pin 20 and the +5V line for both the top and bottom RAM chips; 
next run wires from pins 20 of both the lower and upper chip to the outer 
terminals of the SPOT switch; then connect the center terminal of the SPOT 
switch to the OE pin with another wire (if you're tired of soldering on chip 
pins by now, you could run this wire to edge connector 2 which is the same 
line) . 



I then dri 
(somewhere on 
switch in. If 
bottom cover , 
module. Again, 
one of my earli 
finally used bl 
hole I'd made 
useable memory! 
by flipping the 



lied anothe 
the left ha 
the spring 

it makes 

wrapping a 
er efforts, 
ack electri 
in the 

Now I can 

switch . 



r 1/4" hole 
nd side to 
and door of 

it easier 
ny exposed 

smoke rewa 
cal tape to 
top cover , 
choose betw 



in the front (label) side of the cartridge 
keep it away from the chips) to install the 
the module cover have been moved to the 
to insert the modified board back into the 
wires helps to prevent short circuits (in 
rded me when I powered up the Supercart \ ) I 
wrap around the module and cover up the 
Voila, a manually switchable extra bank of 
een 2 different entry menu screens simply 



One other potentially useful 
single banked Supercart, I would mor 
removed the cartridge or inserted it 
this is because the chip was hardwir 
to transients and "spinal shock" 
"deselect" both RAMs by placing the 
and insert the cartridge even wi 
contents. To run, however, one or 
selected . 



feature I've found is this: with 
e often than not scramble the me 

with the console power on. (In 
ed to be constantly selected and 

when connected and disconnected 
switch in the center position, I 
th console power on without losin 
the other of the RAM chips 



my pre V i ous 
mor y if I 
retrospect , 
was sub j ec t 
. ) Now if I 
can remove 
g Supercart 
has to be 



I hope these comments have been useful to any other "technokl ut zes" beside 

myself out there. If anyone has any correction^ or comments to make, I'd be 

pleased to get them at: Jim McCulloch, 9505 Drake Avenue, 
60203-1107 (CIS ID# 74766,500). 



Evanst on , I L 



1. iTj. JLu v.. JJ alLv.J 
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DISK DRIVE MODIFICATION INFORMATION 

by PAUL DeMARA, GET 10760 ROSEBROOK RD. RICHMOND B.C. V7A 2R7 

WRITE= LOW TO WRITE (BAR ABOVE WORD MEANS LOW LOGIC LEVEL) NORMALY SITS 

AT +5V0LTS. 



2~RESERVED 
4 —HEAD LOAD 
6— SEL 4 
8~INDEX 
10-SEL 1 
12-SEL 2 
14-SEL 3 



16-MOTOR ON 
18-DIRECTION IN 
20-STEP 
2 2 -WRITE DATA 
24-WRITE GATE 
2 6 -TRACK GATE 
28-WRITER PROTECT 
30 -READ DATA 
32-SIDE SELECT 
3 4 -READY 



These even numbered pins control all functions to the disk drive. Pin 
number 32 is of interest because it can switch the head to side two 
electronically on double sided disk drives. Pin 32 is held high logic by the 
IC on the disk drive and is pulled to ground by the disk controller card when 
it wants to read side two. If you were to bring pin 32 to ground by adding a 
switch it would be forced to read side two but the card would not see any 
change and therefore you could format side two with a directory completely 
seperate from side A of the disk. This is very helpful when backing up disks 
or when you want to have two sides with XB loaders on them. You just flip the 
switch to read side two. It is also possible to modify the circuit to read 
side two by calling up an unused DSK# eg. DSK3. would read the back side of the 
disk drive and the controller card would think its reading DSK3. When in fact 
it is reading side two of one of the other disks. This would make an excellent 
way to back up SS disks without having to have extra disks and would be very 
quick as no disk swaping would be neccessary. The side two mod using the 
command DSK3. or DSK4. (3rd party disk controller cards) requires a relay to do 
the switching and some rewiring of the disk drive is neccessary however the 
rewards are worth the effort. The two modifications do not in any way effect 
the disk drives normal operation. 



Here is a diagram of the disk drive 32 pin plug: 



TOP OF DRIVE 00s001111122222333 

24p680246802468024 

================== <34 PIN EDGE CONNECTOR 

00c000111112222233 ALL ODD NUMBER PINS ARE CONNECTED 
13e579135791357913 TO GROUND. 



To wire the side A side B switch you will need a single pole double throw 
switch. You then must locate wire number 32 on the ribbon cable that connects 
the disk drive to the controller card. Cut wire number 32. Then take your 
switch and take wire 32 from the disk drive and hook it to the center terminal 
on the switch. Next take wite 32 from the disk controller card and hook it up 
to one of the outside pins on the switch. The left over outside pin on the 
switch is then hooked up to wire 33 or any suitable ground on the disk drive. 
This switch in one position will make the disk drive operate normally. When 
the switch is flipped the disk drive head switches to side two. One other 
thing that I found is if you format side two when the disk is formated double 
sided on side one you will have to first read side one when getting ready to 
initialize a disk and then flip the switch when the software is ready to 
format. The reason is the disk manager module will give you an error if you 
try to read side 2 before it is reformated. Hope the Modification help all you 
TI users save disk space and save you from hacking up your disks. Anyway if 
you would like more information or a diagram then feel free to give me a shout 
during normal hours. Please feel free to copy this info and if you find it 
helps a donation would be appreciated as I am working on a few other goodies 
for the TI. ^^g^ ^-2 4 



Nc Special Dress cr [Gesture 

Is l^eauired tcTelecemmunicate. 

Ccme as yeu are! 
GO Tl rocuM 



A Look At Compuserve 
Copyright 1986 Jonathan Zittrain^ 
Compuserve ID 76703,3022 

' Co m puse rve's ' Consumer Information Service, is one of the most comprehensive 
and useful networks available today, especially for the TI user. 

Overview 

Compuserve is part of CompuServe, Inc., in Columbus, OH. Users from 
across the country (and lately the world) are able to access Compuserve 
through local telephone numbers in many metropolitan areas or 
supplementary networks such as GTE Telenet or Tymnet. 

Users are billed by the connect- minute, also based on the time of day. 
Rates through a standard CompuServe number are $6.25/hour Standard time (6 
p.m. -5 a.m.) and $12.75/hour Prime time (8 a.m. -6 p.m.). Weekends and 
holidays are considered to be Standard time. These charges are based on 
300 baud. 1200 baud and 2400 baud costs $12.75/hour Standard and $15.75 
Prime. 

A Quick Tour 

So much is available on Compuserve that it is difficult to choose a 
representative sampling I In fact, Compuserve itself has an interesting 
online tour designed especially for new users. Once online, a GO TOUR 
will show each of Compuserve's main areas. 

Compuserve's main structure is in "pages" of text. GO is used to manuever 
from page to page, and on a particular menu one can choose a selection and 
be moved to its corresponding page. The very "top" menu, known as page 
Compuserve -1 or TOP, can be accessed with GO TOP (or even TOP), and looks 
like this: 

CompuServe TOP 

1 Subscriber Assistance 

2 Find a Topic 

3 Communications/Bnl 1 Ptin Bds. 

4 News/Weather/Sports 

5 Travel 

6 The Electronic MALL/Shopping 

7 Money Matters/Markets 

8 Entertainment/Games 

9 Home/Health/Family 

10 Reference/Education 

11 Compirters/Technology 

12 Business/Other Interests 
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The exclamation point (!) is iised as a pronpt. If you see an ! , it means 
that it's your turn to type sonething. A proirpt in Easyplex, the 
electronic mail system (v^ich provides user-to-user "mail" as well as a 
link to MZl Mail), the prcxnpt may be "Easyplex!". At first it may seem 
that the syston is merely excited about the fact that you are using 
^Easyplex ..and is dannonstratir^ that v/ith the !. It beccxnes routine socai 
enough, though. 

FIND is another useful conmand/ and functional almost anywhere. We'll be 
using FIND soon as we look at Conpuserve's "forums." 

For ncM, let's take a look at a typical groi?) of text pages. The AP 
Newswire is a good exaitple: 

AP Videotex APV-1 

Associated Press News Highlights 

1 Latest News- 7 Entertainment 

Update Hourly 

2 Vfeather 8 Business News 

3 National 9 Wall Street 

4 Washington 10 Dow Jones Avg 

5 World 11 Feature News 

6 Political 12 History 

Enter dioice or <CR> for Sports !l 
AP Videotex APV-2647 
AP 10/25 22:57 EST V0540 

Here is the latest news from Hhe Associated Press: 

A stunning new book has been released that is rumored to be a boon to TI 
lasers across the country. Reporters are scrambling for details on this 
conprehensive tome, which is said to succeed Dr. Ron Albrichtr Jr.'s JlSie 
Orphan Chronicles^. 

Stay tuned to this wire for news on this story as it breaksl 



<aheni> Well/ that's something like wiat the AP Newswire would report. 
Also available is the National Weather Service's v^ther reports , 
searchable on a giv^ city or state. Aviatioi reports are surcdiarged by 
very detailed/ including high-resolution v^ther maps that are in RLE 
format (whidi the TI-99/4A can now support via several third party 
prog rams / one of vmch is public domain). 



As you <^r> see, Conpuserve is a great way to tap into timely news and 
other information. Ihe Washington Post and the St. Louis Post-Dispatdi 
are also available in online forms. 



Interaction among people from anywhere on Earth is another incredible 
benefit that Conpuserve can provide. Ccxtpuserve was first vdth a CB 
siimilator^ a program v?here people can "talk" in real time. Here, for your 
viewing pleasure, is a typical slice from a CB. conversation. JZ is yours 
truly: 

CB II - CB Simulator (sm) vlB(34) Band A 
What's your handle! JZ 

(channel) users tuned in 

(1)23 (2)7 (11)1 (15)1 (17)9 

(21)2 (24)2 (26)3 (33)15 (34)2 

(35)1 (36)6 (Tlk)32 
Select a chanr^ or press 
<CR> for more information! 2 

Eiitering open diannel... 
Key /HELP for assistance 

(A2,*Foxi^ from DC*) hi son 
(A2rmGH3CRAWIER) Hi POX! !!!!!! 
/noecho 

(A2,*Foxy f ran DC*) hi night! 

% Echo off 

(A2,JZ) Hello there! 

(A2r*Fo^ from DC*) nice guy... where are you? 

(A2,*Foxy from DC*) hi Jz' ^ 

{A2,*V5aYWARD SCS^*) PCSXY M OR F? 

(A2,*Beach Baby*) hi jz 

(A2rNice Gay) we too, foxy. . .gaithersburg 

(A2,*Foxy from DC*) son. ...yes indeed 

(A2,NIGHTCRAWLER) Sounds interesting and ver\^ imDressive,HB 
(A2,*WRyWRRD SCN*) WHERE D PQKf 
(A2,JZ) Smile at the camera — 
(A2,JZ) this is for a book! 
(A2,*Beacii Baby*) gee thanks, night 

(A2,*Foxy from DC*) < smiles 

(A2,*Foxy frcm DC*) son. •.yes I do 
(A2,Jc w/HBO) Howdies one et al 
(A2,Nice Guy) [[smile] 
(A2,*Foxy from DC*) hi JC! 

AIST 2 



Job 


User ID 


Nod 


Qm 


Handle 


7 


7xxxx,xxxx 


HVT 


2 


♦WKXWARD SCN* 


20 


7xXXXr30CXX 


LAK 


2 


190E 


33 


7xxxXrZxx 


NYL 


2 


*LOVERBOy,nyc* 


50 


7xxxX/Xxxx 


uyy 


2 




62 


7x«xx.yXXXX 


ORL 


2 


*Beac±i Baby* 


88 




BOO 


2 


Jc w/HBO 


94 


7xxxx,xxxx 


DCQ 


2 


*Faxy frcm DC* 


96 


7xxzx,zxxx 


DCI 


2 


Nice Guy 


105 


76703,3022 


PIS 


2 


JZ 



(A2,JZ) I'm "taping" here for the next 
(A2,JZ) ten seconds to show what CB is 
(A2,JZ) like to all those laninformed 
(A2,JZ) folks still living in the 
(A2,JZ) Stone Age! 

(A2,*Foxy frcxn DC*) JZ..that should be enough! heheh 
{A2,JZ) <grin> 
(A2,JZ) Bye! 



All CB cotmands are entered with a slash (/). For exaitple, /EXIT is used 
to leave the CB area. There are 36 channels available — I happened to be 
on channel 2. AJST stands for "User STatus," and lists the \isers on a 
particular channel. The User ID's of those involved have been changed to 
x's to protect the innocenr! /NOECHO is a nice fearure wtiic±i allows^one's 
typing not be "echoed" back— until <enter> is pressed, at which point the 
line of text arpears as part of the normal CB conversation. As you can 
see, that conversation can beccxne fairly tangled! 

The multi-player gaming areas of Ccxrpuserve take the CB concept one step 
further. "MegaVIars" is a gams where many users can ger together at once, 
each user being a star ship. Since a dsnonstration of my lowly scout ship 
being decimated by a much larger dreadnaught would be too graphic and 
violent for such a G-rated book, I've opted not to include that. The fact 
that it would also be rather embarrassing is iirnaterial, of course! Tne 
TI-99/4A is perfectly capable of of participating in such areas, however, 
even v^en screen protocol is required. Terminal Enulator H is not 
suggested; instead, Paul Cnarlton's FAST-TERM or C. Ridiard Bzr^.t's 
PIIERM99 would be good disk-based terminal emulators to use. 

Another more serious application of the multi-user concept is through a 
Cccpuserve fonam. A forum is an area based on a parrioilar topic, which 
contains a message base, data libraries (raere files and programs are 
stored for user retrieval) and a conferencing area (a miriiature CB 
simolarcr) . 

Here's one page of the results of a FIND FOKK ccrarand: 

!FIND FOROM 

ConpuServe 

1 ADCIS Fonm 
[ ADCIS ] 

2 AI EXPERT Fonm 
[ AIE-100 ] 

3 AOPA Forum ($) 
[ AQPA ] 

4 Amiga Forum 

[ AMTGAPORDM ] 

5 Apple User Gro\:iDs Forum 
[ APPUG ] 

6 Ashton-Tate Forum 
[ ASHFORUM ] 

7 Ask Mr. Fed Forum ($) 
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[ ASKFED ] 

8 Astroncxny Forun 
[ ASTROPORUM ] 

9 Atari 16 Bit Forum 
[ ATARI16 ] 

10 Atari 8 Bit Fonm 
I ATARI8 ] 

M3RE 1 

"More" is right 1 There are quite a few forums (fora?) on Carpuserve , and 
the number increases regularly. Topics range from wine-tasting and health 
food to (you guessed it) TI coitputers. In fact, the TI Forum has a very 
nice "entrance" in page format that can describe itself very well: 

The TI Forum TINBWS 



The TI Forum 



1 Introduction 

2 Using The TI Fonin 

3 Items of Interest: TI-99/4A 

4 Items of Interest: TI PRO 

5 Enter The TI Forum 

6 VSiat's News 

7 Index of Topics 

8 Feedback/Questions 

9 Masthead/Copyright Info 

11 

The TI Forum TEX-4 

Wslcoroe to the TI ForumJ The TI 
Forum on CompuServe is an area where 
diverse people can meetf trade 
information and have discussions around 
a central topic of Texas Instruments (tra) 
brand coopiters. 

As a source for information ai^ 
programs for TI ccnputersr the TI Forum 
is unmatched! Its data libraries 
contain surely the best collection of 
quality public dcroain and F&irware 
(we'll talk about "fairware" later! ) 
prog ram s y and topics range frcxn the most 
oonplicated and technical data on the 
coitputers to long-winded discussions on 
pliaggii^ them in and turning them on! 
Whether you're a novice or an expert on 
losing TI ccxiputerSf you will find just 
the level and amount of inf omation you 

M3RE !S 

desire. 



find New rriends cn 

TI Forum 
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The TI Forum has two irajor parts: 
The TI Forum itself, and the 
acccxtpanying irenu pages (recognizable by 
.the lEX-xx page number at the header of 
each page)/ \^ch you are reading right 
now. In order to get the most out of 
the TI Forum, you should first learn how 
to use it, and use it efficiently since 
tine is money v*iile on CorouServe. Hie 
menu area contains both introdnctoiry 
tutorial-t^pe information on using the 
FORUM, and also news and items of 
icrportance for the TI user. Vfe suggest 
you first read "Dsii^ the TI Forjm," 
selection two fran the top menu page of 
TEX-1. USING TEE TI FORlil explains hcM 
to become a member (don't panic, it's 
free! ) , how to use the For^m, and how to 
use your time online mosz effectively. 
Menu items three and four from the TEX-1 
menu allcw all users zo see "che latest 
news and informaricn for liieir 
particular model of TI corputer 
(TI-99/4A and TI Professional, 
respectively). Nfenu choice five lets you 
actually eiter the TI Forjm am see what 
it's all about! 

So, if this is your first tire on 
or so, check our '*Using the TI Fcrjm" 
and you can then proceed zo rhe FCRUM 
itself if you like. Ckxinents and 
questions are always welcone and 
^)preciated; the TI Foram Coordiriatcrs 
and members alike are almost always 
ready to lend a helping hand! 

The TI Forum is nor affiliated with 
Texas Instruments, Inc., in any way. 

If you have any quesrions or 
carnents, you can use our 
"Feedback/Quesrions*' area, oprion 8 from 
the main TINEWS menu, TEX-1. You will 
get a response via Sasyplex, usually 
within 24 hours. 

USING THE TINEWS AREA 

The TINE&S area will be updated 
constantly to provide the latest news, 
help, and information about the TI Forum 
and the TI world in general. You can 
check the "New in TINEWS" aurea 
occasionally to see information about 
the latest features. 



Gettinc t€ Seme 
Peal benefits . . . 
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Now is a good time to introduce sane connands that are very useful in 
navigating around the whole Ccxtpuserve page structure. 

Keep these on hand, and it's hard to becone lost! 

Navigation Catroand Siarrinary 



GO XXX - GO to a certain page number. If you have to break off in the 
middle of a section, you can write down the last page number you saw in 
the upper right-hand comer and just hit GO xxx, where xxx is that number, 
to return. For exaitple, GO TEX-200, or just a GO 200 if you are already 
in the TEX area will take you to the TI Forum. GO TEX-11 (or GO 11 from 
within TEX) will take you to the "Using the TI Forurr^" section of TINB^. 

T - Returns you to the TOP page, usually called TOP, but this is a 
settable page through OPTICXJS. T^pe^GO OPTIONS for more information. 

M - Previous menu. If you are reading an article or buried under a few 
menus, this will let you cliE±> our! It takes you to the latest menu you 
accessed in TINEWS. 

S - Ihis is helpful! It stands for SCROLL and will display a series of 
connected pages (like articles) continuously without making you hit 
<E3OTER> after each page. Great if you are a fast reader or are trying to 
capture a certain section. Just hit S at the prarpt where you are asked 
to" hit <ENrEtl>, or S x, v^re x is a rrenu choice you would like to have 
scrolled. 

N - Proceed to the NEXT menu choice. 

P - Proceed to the PREVIODS menu dioice. 

E - Go BACK one page. F - Go PORWJiPD one page. SET WID xx - Set your 
screen width 

to XX. Set to 80 for buffer capture; 40 for regular /4A screen. 
ISie T-our Finale: Ihe Forum Itself 



Now, a quick gliirpse inside the TI Forjim! Signing vp for the TI Forum, as 
with most public forums, means only supplying your name. Some forums 
accept handles, such as the CB Forum, but the TI Forum prefers full name, 
fere's the TI Forum main menu: 

TSie TI Forum (sm) 

FCJNCTIC»IS 

1 (L) Leave a Message 

2 (R) Read Messages 

3 (CO) Conference Mode 

4 (DL) Data Libraries 

5 (B) Bulletins 

6 (MD) Member Directory 

7 (OP) User Options 

8 (IN) Instructions 



Enter choice ! 



The conference mode, as mentioned before, is really just a miniature CB 
for TI users. There is a weekly conference scheduled where the regulars 
can get together, as well as special events. Craig Miller, Laura Bums & 
John Koloen (of MICROpendium) , and Scott Adams are a few of the people 
that the forum has been lucky enough to have for an evening in CO. 
Transcripts of many CD's have been permanently archived in the TINiWS 
area. 

Ihe Msnber Directory is an area where users can list their own interests 
and find other users with similar interests based on a keyword search. 

Let's go through the process of leaving a particular message. Many 
messages are left to "ALL", which is the public at large, and replies are 
then added to create a message "thread." Once the camands are known, it's 
very easy and convenient to navigate through the message base, reading 
messages and their replies. A Conpuserve forjr:; has, in im' opinion, by 
far the best message base structure of any network or BBS. 

We type "L" to leave a message: 

Enter choice !L 

T*o: John Doe 76543,210 

Subject: Charges 

Eiter /EX to exit EDIT 

[ New rressage ready ] 
John - 

You most have misread your 
booklet! ConoiServe standard 
charges are S6/nour, not SC.06,/hour! 
Sorry for the two hundred dollar 
bill you ran up before you realized 
that."^ 

If there's anything else I can 
do to be of assistance, pleez let 
me know! 

• • • • JZ 

/t 

A/pleez/S 

do to be of assistance, pleez let 
/c/pleez/please/$ 

do to be of assistance, please let 
/ex 



LEAVE ACTIOSIS 

1 (S) Store the Message 

2 (SU) Store Unformatted 

3 (C) Continue Entering Text 

4- (A) Abort the Leave Function 

Enter choice ISP 
SUBTOPIC # REQUIRED 

General/Haalp! 

1 TI News & Views 

2 Hardware/Repair 

3 Prograinning 

4 BBS HelpAiews 

5 Tips & Tricks 

6 The TI Trader 

7 The TI Writer (WP) 

8 TI Professional 

Enter choice : 
Message # 94672 Stored 

When prcxrpted for "To:", if the recipient's User ID is known, it should be 
appended to xhe name. This will flag the nessage for that user v^en the 
user nezt enters the forum with a warning of "You have a message 
waiting:". Messages last a few days, then "scroll off" as new messages 
are left. The size of forum message bases vary, from 500 to over 2000 
message capacities. 

The "/t" moved the pointer in the file to the top, the "/l/pleeze/" 
located the word "pleeze," and "/c/pleeze/please/" fixed the spelling. 
EDIT is not difficult to use, although it's not Tl-Writer. 

Messages can be stored publicly, or with the "?" appended zo the <3>tore 
ccOTnand, privately. <MA>il is also available as a storing option, moving 
the message into the Easyplex mail sysrem where it will be more permanent 
(avoiding the few-day scroll-off), although only the recipient can then 
see the message. 

No7 let's read the message by scanning for messages addressed to John 
Doe. Again ws are at the main forum menu: 

filter choice !R 

READ MESSAGES Where riecks of 99*ers Abound 

1 (KF) Forward 

2 (RR) Reverse 

3 (RT) Threads 

4 (RS) Search 

5 (RM) Marked 

6 (RI) Individual 

7 (QS) Quick Scan 
Enter choice 



Search Field Menu 
(F) Frcxn 
(S) Subject 
(T) To 

Search field: T 

Search string: Doe 

Fonm messages: 93952 to 94672 

Start at v?hat message number 

(N for new to you): 

#: 94672 (P) SO/General/Haalp! 

28-Oct-86 22:23:18 
Sb: Charges 

Rn: Jonathan Zittrain 76703,3022 
To: John Doe 76543,210 

John - 

You must have misread your booklet 1 
Corrp\iServe standard charges are 
$6/nour, not $0.06/hourl Sorry for the 
twD hundred dollar bill you ran up 
before you realized that. 

If there's anything else I can do 
to be of assistance, please let me 
know! 

• • • J2j 

And there it is! When Mr, Doe retrieves his nessage, "(X)" will ^pear 
after his narre in the "To:" field to shew that he has indeed receiv^ it. 
lhat ^plies to all messages with a specific recipient. Remsnber to enter 
the ID correctly, as well, since the s\^zern w"ill not correcr for r\^'s 
ther ^ • 

Archived messages of special note are also stored in the TINEWS area in 
page format. The Great Track Copier Debase, Which Disk Drive is Best?, 
and Tl-Wrirer Tips & Tricks are jxist a few titles of messages and message 
threads that have been saved for posterity. 

Hhe Data Libraries contain file after file (all submitted by users; the 
time it takes to transfer a file to CompuServe is new free of charge — ^you 
don't have to pay to give!) of programs, tutorials, and other gens in a 
multitude of TI-99/4A languages. Ccnpanies often store press releases in 
the DL's as ^^1. TTNEWS has plenty of help with file transfer (this is 
probably the roost difficult process for the novice telecanmunicator to 
learn), and a sirtple BROvse corannand usually serves to get one started 
looking through the list of available files. 
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Conclusions 



So, in a nutshell, that's a bird's eye view of CoipuServe. I am convinced 
that it is the finest, roost econcxnical service available. For the TT 
orphan, the TI ForumAI^EWS area is an incredible resource. CompuServe 
startei: kits are available at roost ccmputer stores for around $20, 
iJicluding several free hours of online tiine to get acquainted. A free 
FEEDBACK area is also available for questions once online. 



See you on the network! 



A SPECIAL OFFER FROM THE SOURCE® 



NO* THAT YOUR PERSONAL COMPUTER CAN TALK TO OTHER COMPUTERS . . . 
Talk to The Source! 

Now you can join The Source Information Network - A powerful tool to meet b©th 
your personal and business needs. The Source offers a broad array of top ' 
quality coimnunications, business, personal, and investment services in a network 
designed to save you time and money online. 

And The Source is the only major online information service that gives you a 
step-by-step guided tour (TUTORIAL) of our most popular services - FREE OF 
ONLINE CHARGES! 

3oin The Source today and we'll waive our standard $49.95 registration fee- 
Your membership can be activated by mailing the attached coupon to: 



Sign on TODAY by calling 1-800-336-3366 Toll Free. Oust tell tfre Operator . . . 
"I'm taking advantage of your Special $49.95 Fee Waived membership offer, my 



The Source 
P.O. Box 1305 
McLean, VA 22102 



claim nunber is 



6450307 



LJ 



Yes! Sign me up as a mejnber of The Source today with the 
$49.95 registration fee fully waived. 



Please send me the SourcePak and Manual at the special 
reduced price of $12.95 (plus $3.00 postage and handling). 
Reaularly $19.95! 



Claim Number 6450307 



Bill my registration fee and usage to: 



Visa [J 



MasterCard [] 



Card number 



American Express [J 



(must be provided) 



Exp. Date 



Name 



Address 

Telephone(Day) 



City State Zi£ 

( Evening ) 



Mothers maiden name (in case ID or password is lost)_ 



I authorize STC to charge all costs incurred on my account as 
a member of The Source (including usage and monthly membership 
fee) to the billing service indicated^ 




Signature 



Date 



/ 



/ 



The Source is a registered servicemark of Source Telecomputing Corporation, a 
subsidiary of The Reader's Digest Association, Inc. ®1986 Source Telecomputing 
Corp. 

Online rates as low as 10<t/minute. $10.00 monthly minimum applies towards 
usage. 

This offer expires 12/31/87. 





The GEnie Systan and TI Roundtable 
by Scott Darling r Head Sysop 
CSnie ID TIKSOFT 



GEnie (tm) (Hie General Electric Network for Information Exciiange) is 
the newest kid on the block in regards to online information services. In 
addition to a Texas Instruments RoiindTable(tm) , there are several other 
manufacturer specific RoundTables available. GEnie also provides 
multiplayer game playing scenarios^ Ccmputii^ Today magazine^ EAASY Sabre, 
the American Airlines reservation system, and more.... all at the same lew 
base nonprime rate of $5 per hour for 300 or 1200 baud access. 

New products soon to arpear incliide more Travel, Shopping, and new 
Financial related products. There are many more products planned for the 
future. 

Now, T^*iy should YOU JOIN GEnie? I mean, isn't it the same as all the 
others? If this were true, this would be the last line I could write! 

Far froR iti .GEnie is VERY different. Ifee entire structure is 
unlike any aroxmd. Everything in SSnie can be done from Men\js or Pages. 
Each page is nurrfcered and you can navigate easily and fairly fast. GEnie 
also allows you to go to a specific page and submenu directly from Logon. 

YOGR Texas Instruments RoundTable includes a Bulletin Board, Real 
Time Conference rooms, as well as a Software/Textfile library. 

The Bulletin Board function is rather \mique. It is based on Topics 
rather than direct messages to a specific individual. This allows you to 
follow a specific iton or idea along its way. 

Structurally, there are specific sections called Categories set yjD 
for Roxmdlable Business, Telecommunicating, Software, Hardware, Basic, 
Forth, Assentoly, Fairware, Gamiisg, Gram Kracker, TI-PRO, as well as a 
Newsletter category. These pretty much cover the gamut of things in the 
TI world. Under each of these categories is where eadi of the Topics are 
entered and responded to. Anyone can start a topic, ask questions, and 
provide answers. 

Most of you are used to your loccil Bulletin Board systems in terms of 
what to expect and how to react to a message base. GEnie 's BBS format 
differs from your local BBS in certain ways, but as I have done, you too 
will understand and really aj^reciate the format. 

TJie RouncJTable RealTime Conference is available every Sunday evening 
for the 4A and the PE«D. These are general sessions and are cdways "free 
for alls". Whatever questions you may bring with you will most likely be 
answered during the conferences. This is a Great of^rtunity to meet and 
talk with your fellow TI enthusiasts. 



The Software Libraries are growing daily. At the time of this 
writing r they have grown to over 500 files. A lot of the software is 
Public Dcxtain; the biggest selections are include Fairware and Krackerbox 
programs. Just about every Fairware program can be found in the TI 
Roundrable library^ including the latest versions. We also have virtually 
every Gram Kracker program that has been written. I don't have the sp^oe 
to list every program in every library. Suffice to say that there are 
quite a few and the list is growing. Also, please note that on GEnie, the 
UPLOADS are EEOSE! Free reloading is available during Non Prime 
time (Weekdays between 6 pm and 8 am., all days on Weekends and Holidays). 

The file transfer process is also noticeably faster than most other 
systenas. GEnie utilizes their local network nodes for file transfer which 
results in faster operation than that from the mainframe. Consequently, 
the numbers just seem to fly by. Nice, especially when you are diarged 
for connect time. 

Now the best part about GEnie. . .the' PRICE! There is a one time start 
\jp fee of ?18.00 to join GEnie, whidi includes a hardcopy user manual as 
well as the monthly Liv€Wire(tm) newsletter. Connect charges are $5.00 
per hour for both 300 and 1200 baud during the non prime time hours 
specified earlier. 2400 baud is also available in over 65 cities 
throughout the U.S. at an hourly surcharge of $10.00. GEnie is also 
available during the daytime at a cost of $35.00 per hour for 300 and 1200 
bai3d. Hhe same 2400 baud surcharge also applies during prime time. 

Sign up for GEnie is siirple and fast. You do not have to order a 
starter kit. You sinply sign up online. Just set up your terminal 
program for 7 bit, even parity, one stop bit, or 8 bit, one stop bit, no 
parity; and either 300 or 1200 baud. Also set your terminal to local 
echo(half duplex). To connect, have yoxir modem dial 1-800-638-8369. 
After COJNBCT, type "HHH" and CARRIAGE RIOTRN. At the -D#=" prompt, enter 
•*X3M11999,GE3SIIE'', followed by a CARRIAGE RETCIRN. After you are logged on, 
GEiiie will ask you several questions pertaining to your particular system. 
If you decide to sign up, GEnie will lead you through the electronic 
signi:?) process, and will a^ you for pertinent information. GEnie accepts 
Visa, MasterCard, ard CheckFree. VELthin twD business days follovdng the 
succesful CGcpletion of the Sign up process, a GEnie r^resentative vriJJL 
will call you with your new <25nie Dser ID#. In a few days follcwdng this 
you will receive your GEnie manual. One last bit of inportant 
information. There is NO monthly TfiTn-iTrmm billing. You only pay for v^Aiat 
you use. 



The Delphi Network 
by Jeff Guide 
Delphi Name "TELEDATA" 



General Videotex Corporation 
3 Blackstone Street 
Cambridge, MA 02139 

Rates: $7.20/hour, 6:00 PM.7:00 AM, Monday - Friday & all day 
Saturday and Sunday. $17.40/hour all other times. 

Network: Tymnet and Telenet 

Start-up costs: Lifetime membership, S49.95 includes DELPHI 
handbook two hours of free non-prime time useage. DELPHI Starter 
Kit, S29.95 includes lifetime membership, conmand card and one 
hour free non-prime time useage. 

DELPHI is a full-service information utility designed for use 
by the whole family. DELPHI offers electronic mail, 
teleconferencing and bulletin boards in addition to information 
services such as weather reports from Accu-weather, news and 
sports from the Associated Press, business and financial 
information, trivia tests and movie reviews. It also offers 
interactive shopping, travel and brokerage services, games and 
others entertainment features. 

Of special interest to Texas Instruments computer users, 
DELPHI offers the Texas Instruments Information Network (TUN). 
The TUN offers the latest in happenings in the TI world. We 
offer weekly conferences for the TI 99/4A and the TI Professional 
computers. Exclusive to the TIIN is a member polling area where 
you can express your views or start your own poll. The TIIN 
Shopping Area have the latest products offered in the TI 
community. Vendors such as Disk Only Software and ASGARD Software 
offer the latest in hardware and Software for the TI 99/4A 
computer. Interested in the latest information or public domain 
material? We have database libraries to supply your needs. 
Interested in communicating with other users? Have questions on 
your equipment or know a new technique? Visit our Forum message 
area and the world is at your keyboard. 

As a special offer to those purchasing this book, you can use 
the TIN on DELPHI tonight! Just follow this procedure: Dial your 
local Tymnet or Telenet number. When "Please Log In" appears, 
enter DELPHI. At "Username" enter J0INTI99. At "Password" enter 
TELEDATA. During this special offer, for $10.00 you will receive 



a membership account and one hour of non-prime time useage. For 
$29.95 you will receive a Users Manual, Command Card, membership 
account and three hours of non-prime time useage. 

Join the TUN and experience a new world of telecorranunication. 



Editor's Note: I like Delphi; a lot. I think it is a system that 
deserves better publicity than General Vidtex has given it. Not 
just the T.I. Information Network (T.I.I.N.) run by Jeff Guide 
and_ Dick Ellison {supporting the TI Pro users), but the whole 
facility is a nice place. Very friendly and easy to navicate. It 
also has a FREE online encyclopedia (the other systems have one, 
but have a surcharge for it), and has the only "gateway" service 
to_ the massive and complex DIALOG information service. Those two 
things, alone, are worth the price of admission.. But the owners 
of Delphi appear to be slowly waking up to reality - the reality 
that the commercial telecommunication business is a competitive 
one and you have spend some money to compete. The General 
Videotex people are starting to do just that. If they do, and the 
word gets out to the world that this is a useful network, Delphi 
will achieve its rightful choice among the "Big 3" (Compuserve, 
Source, GEnie). I recoimiend this network and you can reach me 
there ^for mail or on T.I.I.N. with a messace. Take advantage now 
of T.I.I.N. 's generous signup offer - its not offered on any 
other area of Delphi. Thanks to Jeff Guide for aetting us this 
deal and for pushing General Videotex to cet" Delphi in the 
lights. 




Find new friends en Deiplhi 



INSTRUCTIONS AND HINTS 
FOR TI-NRITER NORD PROCESSOR 
by Dick Altoan 

IT QAOl MASTERED! It just takes perseverance and deteraination and a desire. I have been using it since January 1985 
and I don't have it all yet, but I can use it to iy iisense satisfaction. This caie fros lonths of sitting Nith the large 
sanual in ly lap flipping pages back and forth until I had practically leigrized the ill thing! I Has at the point Nhere when 
I had a probles I could say 'Oh that is on page 146" or Nhatever. For instance: this article Mas done on the TI-NRITER and I 
noN do ALL of ly correspondence with it also. . 

If you received the disk nith this article, load it up in TI-HRITER and call it up on the screen so that you can see 
which cofiiands-and nhere they were used-to cause the different effects shown in this article. If you received the disk only, 
then you aren't reading this unless you have already booted it up. It is suggested that you run off a printed copy then 
reboot this back up so that you can see the coaaands in use as you read the article. There are coiaents in the prograe just 
below or above the coaaands that don^t show in the printout! This is another TREENARE' itea. There is no price set for it. 
Feel free to pass a copy on to whoaever wants it. If it will help only one or two people that are struggling to learn 
TI-KRITER I will be pleased. If you learn anything froa it, and are inclined to fairness, send a few bucks when you can 
afford it to Dick Altaan, 1053 Shrader St., San Francisco, CA 94117. There's no big deal if you don't-only \rour conscience 
will know. At least drop ae a note and let ae know it helped soaeone. 

This is gonna be ioo:g-ng, but still auch shorter than the 175 page instruction aanual! 

FIRST RULE: Read the TI-NRITER Quick Reference card and reread it. Of course this aeans after you read this article. Do 
all of the operations shown on the card-at least once-even though you aight think you will never need that particular one. 
You will find you have to open up the big aanual probably, to accoaplish soae of the operations. After you have alaost 
*aeaorized' the card (literally!) then you will find yourself using it alaost exclusively and very seldoa having to refer to 
the cuabersoae aanual. Personally I think the aanual is poorly written. 

You will find 3 'windows' -fros left to right-to obtain the 80 coluans (80 noraal characters) width. Each window is 40 
coluans wide. The first one is froa to 40, second one is froa 20 to 60, and the third is froa 40 to 80. The first thing I 
do upon booting up TI-WRITER is to set ay iiaits to 37 characters wide. If I take a whole window of 40 characters, it seeas 
to crowd ay screen, and I don't like to window back and forth to read ay work. I do this by pressing "T" (for TABS), then 
press ENTER, then placing an "L" on the second dot, and an "R« on the 39th dot, then pressing ENTER again. Now I find ay 
cursor blinking at ae froa line SOOOl. Here is where I tell the printer what aargins I want it to print ay work within. It's 
also at this point that I select condensed type because I like it better than the noraal size type, and I can get 132 
characters per line if I wish. It just looks better in ay opinion. I noraally do this on line 0002 because I used OOOi to 
set up the foraatting (aargins, etc.) coaaands to the printer. 

So, on line 0001 I put in the following 'dot' coaaand* (a dot coaaand is aerely 
starting with a period): .L« 20;RH 120;FI;AD (AND END ALL DOT COHHANDS WITH A 
'carriage return'). The seaicolons are necessary, and the spaces, just as I 
listed it here. I'll do it again: .L« 20;R« 1205FI;AD(c/r). You of course don't 
put in the line nuaber 0001. That is already there. 

That tells the printer to set the Left Margin at 20, the Right Margin at 120, 
then Fill each line, and Adust (justify) the right aargin. The TILL' coaaand 
tells the prograa to put in as aany whole words on a line, within your 
predeterained aargins, as possible. The 'ADJUST' tells it to add extra blanks 
between words to cause the even right aargin as this article has. 

I changed the aargin settings on the last two paragraphs just to show you that you can enter your 'coaaands' just about 
anywhere within your work! 



Page 8-2 



Just pressing ENTER will norBally autoaatically put in the 'carriage return- syabol, but soietiaes it doesn't. It depends on 
what you were doing last. In that case, use Control and 8 to put in a carriage return. 

On line 0002 I put in a 'Control' coaiand thusly: Control U Shift Control U. Neither a 'dot' at the beginning, nor a 
'carriage return' at the end is necessary. This coaaand throws the printer into 'condensed' type. Neither of these two line 
nuabers will be printed on paper. They are aerely foraatUng coaaands. Host of the 'Control' cooaands are listed at the 
bottoa of this article. 

Then if I want to center a title (or date) or soae other heading at the top of ay article, on line 0003 I put in another dot 
coaaand like this: .CE (reaeaber a carriage return is required at the end of all dot coaaands). If ay title is say three 
lines of type, then aake that dot coaaand thusly: .CE3(c/r) otherwise it will 'center' only one line. The centering coaaand 
at the top of this article was '.CE5' because of the blank line in it. The lines you wish centered have to iaaediately follow 
the centering coaaand. 

The autoaatic page length is 66 lines. This gives you about six blank lines at the top and bottoa of your page, and only 
fifty soae actual lines of type. You can, with a dot coaaand change your page length with this: '.PL ##' as I did in line 
0002 of this article. (Not enough rooa in 0001) 

Then you start typing your article, letter, whatever. If you wish each paragraph to be indented, it takes another dot coaaand 
of: .IN(nuaber). If, as in ay suggested aargin settings of .LH 20;RM 120, you wished to indent each paragraph five spaces, 
the coaaand would be: .IN 25 because the counting starts at zero or left edge of the paper. If you include the indent coaaand 
with others in line 0001, the seaicolon replaces all but the first dot, thus .LH 20;RH 120;INJ5. You aay put aore than one 
dot coaaand on one line, or the Control coaaands, but never both of then on the saae line. 

The fun part of a word processor is the capability of inserting or deleting a word or an entire phrase without having to 
retype the entire page or article. Another fun thing is the ability to aove a sentence or an entire paragraph to another 
place in your work. This is all done very siaply. Just place your cursor in the last space before where you wish to insert 
another word and press the FCTN key and the nuaber 2. This causes everything beyond your cursor to aove down one line, then 
type in your new word or sentence and after the space at the end of it press the Control and the 2 (just once) and everything 
will juap back up to your cursor' If you are near the beginning of a long paragraph it takes a little longer (a couple or 
three seconds) to reforaat the paragraph, than it does if you are near the bottoa of that saae paragraph-DQN'T SET IHPATIENT 
AND HIT THE KEYS A6AIN, JUST WAIT A COUPLE OF SECONDS! 

To aove let's say paragraph #10 into the 13 spot is just as easy. First look at paragraph 110 and aake a note (aental??) of 
the line nuabers on the first and last line. Function and zero shows the line nuabers or aoves thea off the screen. Suppose 
they were 0076 and 0093. Then deteraine what line nuaber you wish it to be after. Let's suppose it was 0023. Then with FCTN 
9 go to the 'coaaand' line, type H (for Hove) and hit ENTER. Then type in 0076 0093 0023 and hit ENTER again. Look at those 
nuabers and read the instructions on the Quick Reference Card for HOVE. 

On aost dot aatrix printers, there are two different coaaands to aake neat printing. They are called ^eaphasized' and 
^double strike'. You can't use (on ay printer at least) the eiphasized tethod while in condensed size of type. But I can use 
double strike. The difference is basically this. Both coaaands print each letter twice, but in two different ways. One of 
thea (tiphasized) aoves the head slightly to the right so that each letter is a little thicker. Double strike just prints the 
line twice. I think eiphasized is slightly faster than double strike, but I've never tiaed either of thea. Since I use 
condensed printing altost exclusively, and can't use eaphasized, I don't worry about it. Incidentally, you aay enter these 
coMsnds throughout your article. You just have to have thea begin at the left aargin of your work. As long as you begin dot 
coaaands with a period, and the control coaaands with Control U (and end dot coaaands with a carriage return, and control 
coaaands with Control U and/or a capital letter) you'll be O.K. Only this paragraph was using 'double strike', look at the 
difference. 



An interesting fact about aost printers is that it not only inserts unobtrusive spaces here and there to ADJUST each lirr to 
the predeterained right aargin, IT PRINTS EVERY OTHER LINE FROH THE RI6HT TO THE LEFT while doing all 'that' FILLING and 
ADJUSTING. It will also correctly nuaber your pages if you give it the FO coaaand, which is another dot coaaand. 
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I find once in awhile, 50«e one coaaand (never the sane one twice) seeis to falter. Just redo it. soaetites I think sose 
cofisand aust be there that is invisible (this is possible!) so when you run into an unexplainable problea, go back to your 
foraattinq coaaand line{5)-which are usually lines 0001 and. 0002-put the cursor at the end of each of your coaaands then press 
FCTN and 1 and hold thea for a couple of seconds to delete any possible typing errors that placed soae sort of ^hidden' 
coaaand in that line. 

Another good coaaand to learn is the 'OOOPS' coaaand. Herely Control and the figure one. This eliainates only your last 
change just now typed in, and returns your work to its foraer self (hopefully!). 

Another good habit to get yourself into, is 'SAVINS' your work every few ainutes (or every few pages). Power glitches do 
occur froa any power coapany. Either surges, or stuables. Soaetiaes just an electric aotor in your hoae (refrigerator, etc.) 
kicking in will cause a aoaentary change in the power supplied to your coaputer (you've seen your lights flicker). If you 
save your work every once in awhile, you soaeday will be glad you were in the habit. Especially if you have just put in to 
the word processor a 20,000 word story. The power glitch could cause you to lose it all! If you have been saving it on a 
disk, when that glitch occurs you will have all but a saall part of it saved. When you save soaething to a disk, then coae 
back to that saae disk and save soaething else with the saae naae, it replaces the first itea with the second. It does not 
becoae two seperate iteas on the disk. Of course, if you are really a worry-wart, you will do the saving on two disks, 
alternating back and forth, just in case that glitch coaes while you are in the act of saving your work. 

When you wish to reload a file froa a disk back into the word processor, it's EASY! When you first bring up the word processor 
in the Editor aode, you are autoaatically in the coaaand line. Just type LF (for Load File) and hit ENTER, then type in 
DSKl.(and the naae you gave it) then hit ENTER again and wait a few seconds for the work to be loaded into your coaputer froa 
the disk. 

H you want a rough draft of your work on paper (I find it easier to proof than on the screen) just reaove your coaaands for 
double strike or eaphasizing to conserve your printer ribbon. It will not be so easy to read, unless your ribbon is new, but 
it will be done faster, as well as not using up ribbon ink unnecessarily. 

In the book von will find two aethods of going to the disk, then to your printer. Printing should be done froa the disk, not 
UG.T. the coaputer. Vou will find a coaaand of 'Print File'. That's not the one I use! The one I have becoae accustoaed to 
using aav take a few seconds longer, but it is the one I learned first, and I have just stuck with it. It is as follows. 
After I have finished typing ay letter or whatever, return to the coaaand line with FCTN 9, there type a Q (for Quit) hit 
ENTER, then S (for Save) and ENTER, then DSKl. TERRY or whatever naaeTwant to give the file instead of TERRY, then ENTER. I 
usually use a short two or three character naae. I have even been known to use II, or #2, or soaething like that (the file 
naae cannot be aore than 10 characters long, and you can't have any spaces in a file naae). Then, after the work goes froa 
the coaputer to the disk, you can either print it now or soaetiae next week. The coaaand to go to the printer at this point 
is like this: Q (for Quit) ENTER, then E (for Exit) and ENTER again. This takes you back to the aaster aenu. This tiae, you 
select 12, or THE FORNATTER. After it coaes up, you have to type in DSKl. (f ilenaae) and hit ENTER. Then you have to type in 
the coaaand telling it to go froa the disk to the printer, instead of to the screen. (With the use of DISKO or soae such 
asseably language repair prograa, you can insert the coaaand to your printer so that it is a default just like all the other 
selections on the screen. It is in 'EDITAl' of your TI-WRITER disk.) Without knowing what kind of printer you have, I can't 
give exactly the correct coaaand here, but it will be soaething like this: PIO or RS232. BAMBOO. LF, then you will have five 
aore choices, aostly for which you will just press ENTER for each of thea. Perhaps you eight wish aore than one copy, so on 
the correct one "you would punch in that nuaber. fie sure your printer is turned 'on' before hitting the last ENTER, (the one 
that says "PAUSE AT END OF THE PAGE?) because you will be printing iaaediately. 

For io\ir purposes (aanuscript writing) you will want it double spaced. That is siaply a dot coaaand of '.LS 2' (LS for Line 
Spacing of course!) and if you want it triple spaced, just change the 2 to a 3. Or of course use it for a rough draft or soae 
such. Ta aostly just raabling here, to give this particular paragraph soae length, so that you can see double spacing at 
work. I can't seea to think of anything else to say, so I will just end it here. 
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There are aany, aany eore cofiisands available, such as serging either parts of tNO different files, or aerging a Nhole file 
into the aiddle of another, or putting in headers at the tops of every page, and footers at the bottoa, all autoaatically. 
Such things as page nuabers, or requireeents for aanuscripts, etc., but those can be found as you need ea. 

The Nord processor does have a capacity beyond which you have to save your aorkto disk, and start Mith a clean slate. It is 
approxiaately 20,000 characters including blanks. I have only run into it when transferring a long story to disk. I was 
entering a 10,000 »ord story, and I got 'MEMORY FULL-SAVE OR PUR6E' flashing at ae at the top or cgaaand line after about 
4,000 words (I wish it aould ring a bell or soaething). At that point 'save' your work and retire that file naae. Perhaps in 
this article I aa writing for you I will reach that point again. Right now I aa typing on line nuaber 466. I think it was at 
about line 400 plus (but I was using BO coluan width that tiae for a special project, I think) that the HEHORY FULL thing 
happened to ae. You will just have to triaLand^.Brror it for your job! Of course, the length canNOI be judged just by the 
line nuabers on the left side of your screen. Think about whether you are using only one window, or two, or the aaxiaus of 
three. I aa using just one window while I do this work, as I explained earlier, so that will aake ay capacity coae auch 
farther down the line nuabers than if I were using all three windows! BO characters (or coluans) wide, instead of the 37 I as 
using. If and when the MEMORY FULL bit happens to you, reaeaber that when you save it this tiae to a disk, then for pete's 
sake don't save the next tiae to the saae file naae! In other words, ay naae for this file at the aoaent is TI-WRITER. If I 
need to aake a new file, it will becoae TI-HRITER2. 

The little 25 page booklet froa Dr. Bill Browning is very good, don't ignore it when you are trying to learn the TI-WRITER 
word processor. 7541 Jersey Avenue North, Brooklyn Park, HN 5542B. Price just $6.50 and worth every penny. 

There is also available in 'FREEiiARE' circles an excellent disk called "TK-WRITER" which was done by TOM KNIBHT, thus the 
'TK'. It replaces the need for a cartridge to have Tl-WRITER word processing capabilities. As far as I can tell, it does 
exactly the saae things the cartridge does, except for Show Di rector y-which is inconsequential, and won't go direct froa the 
Editor stage to the Foraatting stage. You can probably find it in the saae library you obtained this disk froa. 

The conaand for the underscore is aerely the aapersand (Shift 7) and it can be used anywhere. Note even in the aiddle of the 
word '-cannot'. If you want to underline agre_than_one_word you have to connect thea with what is called a caret. It is above 
the 6, or Shift 6. H you wish, the AMPERSAND can be printed in your work, but not the caret. Merely type in two aapersands 
and only one of them will be printed! & & 

Believe ae, all of this wi_li becoae easy and second nature to a good typist in a very short tiae! But if you don't use it for 
a aonth cr two, you will find yourself going back and back and back to the big book! 

Thanks so auch to Dr. Buy Roaano for his assistance in writing this article. Plus his enoraous patience with ay duab 
questions over the past few aonths while I was learning the TI-WRITER. Also to Hal White and to Larry Rosenberg for their 
invaluable assistance. And to Terry & Paul Anderaan for their desire to have word processing capabilities, which forced ae to 
finally write this that had been nagging at ae so long. 

mtmm 

CONTROL COMMANDS 

^ ^ ^ yif ^ ^ ^ ^ ^ ^ ytf «i/ ylf tL<\|/«^il/%L<i^t^\^il/i^^>\L-i^il/il/\^^ «1# ^ %L« tl> ^ %^ ^ ^ ^ • 1> ^> ^ >|- ^ ^ aL^ 



ASCII 












CODES 


FUNCTION 


FORMAT 











Terminate Tabulation 


ctrC u, shift 






"u 


7 


Sound the busser 


CTRL U, SHIFT 


e. 


CTRL 


u 


8 


Backspace 


CTRL U, SHIFT 


H, 


CTRL 


u 


9 


Horizontal tabulation 


CTRL U, SHIFT 


I, 


CTRL 


LI 














10 


Line feed 


CTRL U, SHIFT 


J, 


CTRL 


U 


1 1 


Vertical tabulation 


CTRL IJ, SHIFT 




CTRL 


Li 
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< 



12 
13 


Form -feed 
Carriage return 


CTRL 
CTRL 


u. 


SHIFT L, 
SHIFT M, 


CTRL U 
CTRL U 




14 
15 


Print enlarged characters 
Print condensed characters 


CTRL 
CTRL 


u, 
u. 


SHIFT N, 
SHIFT 0, 


CTRL U 
CTRL U 




17 
18 


Select printer 

Turn off condensed printing 


CTRL 
CTRL 


u, 
u. 


SHIFT Q, 
SHIFT R, 


CTRL U 
CTRL U 




19 
20 


Disable printer 

Turn off enlarged printing 


CTRL 
CTRL 


u, 
u, 


SHIFT S, 
SHIFT T, 


CTRL U 
CTRL U 




27 


Escape 


CTRL 


u, 


FCTN R, 


CTRL U 




27; 48 
27; 50 


Set line spacing 8 per inch 
Set line spacing 6 per inch 


CTRL 
CTRL 


u, 
u, 


FCTIM R, 
FCTN R, 


CTRL U, 
CTRL U, 





27; 51 
27; 52 


Set line spacing n/216 per incH 
Turn Italic Character set on 


CTRL 
CTRL 


u, 

u. 


FCTIM R, 
FCTN R, 


CTRL U, 
CTRL U, 


4 


27; 53 
27; 56 


Turn Italic Character set off 
Disable p£\per~end detector 


CTRL 
CTRL 


u, 
u, 


FCTN R, 
FCTN R, 


CTRL U, 
CTRL U, 


5 
8 



27; 57 
27; 65 


Select paper— end detector 

Set line spacing (1/72 to 85/72 inch) 


CTRL 
CTRL 


u. 


FCTN 
FCTN 


R, 

Ri. 


CTRL 
CTRL 


u, 

u, 


9 
A 


27; 66 

27; 67 


Set up 8 vertical tab pos. 

Set -form length up to 127 lines 


CTRL 
CTRL 


u, 
u, 


FCTN 
FCTN 


R, 

R, 


CTRL 
CTRL 


u, 
u, 


B 

C 


27;: 69 
27; 69 


Bel up to 12 horizontal tc\b positions 
'T' u I'" n o n e ni p h a i 2: e d p r' i n t i n g 


CTRL 
CTRL 


u, 

u, 


FCTN 
FCTN 


R, 

R, 


CTRL 
CTRL 


u, 

u, 


D 
E 


27; 70 
27; 71 


Turn off emphasized printing 
Turn on double printing 


CTRL 
CTRL 


IJ, 
u, 


FCTN 
FCTN 


R, 
R- 


CTRL 
CTRL 


u, 
u. 


F 
G 


27; 75 


Turn of-f double printing 

Turn on normal density graphic printing 


CTRL 
CTRL 


u, 

u, 


FCTN 
FCTN 


R, 
R, 


CTRL 
CTRL 


u. 
u. 


H 

K 


27; 76 
27; 77 


Turn on dual density graphic printing 
Turn Elite mode ON 


CTRL 
CTRL 


u, 
u, 


FCTN 
FCTN 


R, 
R, 


CTRL 
CTRL 


u, 
u, 


L 
M 


27; 7B 
27; 79 


Set skip-over perforation 
Release skip-over perforations 


CTRL 
CTRL 


u, 
u, 


FCTN 
FCTN 


R, 
R, 


CTRL 
CTRL 


u, 
u. 


N 
D 


27; 80 
27;ai 


• 

Turn Elite mode OFF 
Set a column width 


CTRL 
CTRL 


u, 
u. 


FCTN 
FCTN 


R, 
R, 


CTRL 
CTRL 


u, 
u, 


P 
Q 


27; 82 


Select 1 of 8 int'l char. sets 


CTRL 


u, 


FCTN 


R, 


CTRL 


u, 


R 
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IlzWBIIiB-yNPERLINING 



Those of you who use T I -Writer and the ampersand -for underlining, 
may find even if your printer has full underlining, you still get 
"dashed" underlining. I first realized this when I switched from the 
TI Impact to the Star Mi cronies Delta 10. 

When I first got the new printer, I messed around with the control 
codes and found the printer had full underlining capabilities. I later 
used the ampersand in Tl-Writer to do some underlining and got the 
dashed underlining. I then realized the underlining characters used by 
Tl-Wr iter's ampersand were defined by Tl-Writer. 

The codes used on the Delta 10 (the Gemini uses the same underline 
codes) are CHR* (27) ; CHR* (45) ; CHR^ ( 1 ) to turn the underlining feature on 
and CHR*(27) ;OIR*(45) ;CHRS(0) to turn the underlining feature off. The 
command used in Tl-Writer was ".TL 91:27,45,1". This command assigned 
the left square bracket , function R (or ASCII 91) the values needed to 
turn on true underlining. Another command, ".TL 93:27,45,0", the right 
square bracket, function T (or ASCII 93) was assigned those values 
needed to turn off underlining. 

Of course, these commands must be used in conjunction with TI 
Writer's formatter. If your printer has true underlining capabilities 
and you have been using TI Writer^ s ampersand command, -vou may wish to 
start using the transliterate command to d o vour underlining. 

The TI Writer 

The Easy Way to Ccmmunicate 

MAYBE YOU DIDN'T THINK OF DOING THIS WITH YOUR TI-WRITER 
By Bruce Larson 

ONE DISK DRIVE - If you only own one drive, here's a trick to save 
wear and tear on you and your equipment. Make a working copy of your 
Tl-Writer disk, with only the EDITAl, EDITA2, FORMAl, and F0RMA2 files. 
This will leave you 271 free sectors to temporarily save material 
you're working on until you have everything perfected. No more pushing 
and pulling disks while you go from editor to formatter, back to 
editor, back to for matter. ad infinitum! By the way this article 
occupies 14 sectors. 

REM STATEMENTS - Want to document a program without adding REM 
statements? List your program to -DSKl.NAME- instead of -PIO- or 
••RS232**. This creates a Display /Variable 80 file of your program 
listing which can be read by Tl/Writer. Now you can add comments, 
instructions, etc., that will appear on a printout of this file. A 
word o-f caution! Make sure the Display/Variable SO file name is 
different than your program name or you might find yourself with a 
beautifully documented program that won't load! 
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EXTEND THE USE OF TI-MRITER 
By Allen Burt - England 
Froi NorthMest Ohio 99' er NeNS, Hay, 86 

TI-NRITER can be used for luch lore than just producing 
letters— a substitute for a typeiiriter. In the last article 
I described hon to take use of the CONTROL 'U' function in 
the Text Editor lode. This function can be used to ertend 
the application of the systea and to produce integrated 
docutents of Mords and diagrams. For exaiple, it is easy to 
shoM a Histograa (Bar Chart) like Figure 1. This uses the 
CHR(124) obtained using "FIMCTION* F AND KEY "A* for the 
vertides and the underline character CHR(9S), FUNCTION 
and KEY "U". 

A useful tip Nhen doing this type of exercise is that 
if you place the CHR(124)'s in the appropriate locations and 
Nish to continue thei doNniiards froi the point indicated by 
the asterisk - just aove the cursor doNn to the next line 
and press CONTROL *C' and key 'S - this copies the line 
above onto that line. Nhen you draN diagrais like this, it 
is better to insert a nuiber of lines in order to have roos 
to aove around. 

If you Nant to include a siaple graph Mithin your 
script, try doing this as shoMn in Figure 2 below. A aore 
sophisticated graph can be achieved using the above 
techniques. In the exaaple I found the 'COPY' coaaand very 
useful because having once obtained the required Nidth - I 
only had to 'copy' down the required nuaber of lines using 
(CONTROL li KEY "). Reaeaber that when you place a special 
set of codes at the start of the line, the space they occupy 
Mill not be recognized by the printer. That is,the printed 
line Hill coaaence at the location of the first special 
code. This can place the nuabers used in the graph in the 
urong place. You have to enter your special codes at the 
point you wish the folloNing characters to print. Thus, 
Nhat you see on the screen is not necessarily Nhat you Mill 
get on the printout. 

TI-MRITER can be used to draw graphs as Figure 3 
illustrates. The horizontal lines are achieved by setting 
the printer into an underline aode 
(CHRI27;CHR$(4S);CHR$(I)). The line spacing is set to 7/72' 
(Clffi$(27);'A'CHR$(7) - This approxiaates to 1/10'. If a 
CARRIAGE RETURN is placed at the point Nhere the line should 
finish, the printer Mill draw a line to that point. The 
vertide lines are draiin by using Clffil(124} - Function 'A'. 
As the printer noraally prints at 10 characters to the inch, 
this Hill produce a grid of roughly 1/10' squares. 

There are 2 points to aatch using this procedure: 

1. If you do not Mant the underlining to start at the 
beginning of the printer line, the underline code aust be 
placed at the start of each line and cancelled at the end of 
each line before the carriage return. There is another 
aeans of achieving this and that is to set the left hand 
aargin to the required position (on 6ENINI printers this is 
CHRI(27);"N'CNRI(N) - n being the coluan to start printing. 
THIS CAN ONLY BE BONE USING THE PRINTER CODES, NOT BY 
SETTING TI-NRITER'S TABS. 

2. The second point is that aany printers do not align the 



characters in a bidirectional aode. YOU ARE ADVISED IN THE 
TI-NRITER HANUAL THAT FOR TABULATION, IT IS ADVISABLE TO SET 
THE PRINTER TO A UNI-DIRECTIONAL PRINTING -NODE. 

Figure 4 illustrates hoM a line Mill appear on the 4A 



screen. 



Figure 1 
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USINB TI-HRITER TO DRAW A 6RAPH 
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CM ARACITER OfR AF>M I C© 
UJITM XX— UIRIXER 
by Rod Cook 
OH-MI-TX 

Graphic characters can be 
dwiinmd in TXHilRXTER and printed 
to tha printer by using a com- 
bination of tha translitarata 
command and the graphics control 
codas tha printar. 

Tha tranalitarata command has 
tha format I 

.TL nichar#,char#, ,char# 

Nhara n is tha special character 
number and char« is the decimal 
number to be transmitted to the 
printer. For en ample, in the 
follo«4ing command I 



"II 
'I 

2 
1 













■ 
























F 








t 


i 





















.TL 0i46,B4,76 



where in vertlcle row 1 none oi 
the dots are on so they add up 
to zero. In verticle row two 
the dots at 4,6 and 64 are on so 
they add up to 76. In verticle 
row three 16 and 2 dots are on 
so they add up to 16 and so on 
with the remaining three 
verticle rows. 

6o the transliterate command 
to print the special character © 
looks like thlsi 



anytime the special chartacter 
"e** is encountered in the text, 
the FORHATTER will transmit the 
numbers 46, B4 and 76 which in 
this case happen to be a period 
followed by a capital T and L. 
The value O'f chart can have any 
value between and 255 although 
ASCZ2 values only go up to 127. 

The transliterate command 
will define the graphics ^or the 
character to be printed. One 
transliterate command per 
Character will be required. Each 
command will have essentially two 
partsi the control codes to setup 
the printer into graphics mode 
•nd the data. For the purpose ot 
illustration, the control codes 
discussed will be <for an Epson MX 
60. The control code -for printer 
graphics isi 

<ESC> -K" Nl N2 

wnere <ESC> is the escape 
character, number 27 and "K" is 
number 75. Nl and N2 are numbers 
that are used to specify how many 
data numbers follow. This 
control code puts the printer 
into a graphics mode that prints 
460 dots per 6 Inches. An 80 
character line is also 6 inches 
long, there^ora 480/80 ■ 6. 
There are 6 dots per character 
and it will take six data numbers 
to specify the character. The 
control code portion of the 
transliterate command will look 
like thist 

•TL 0i279 7S»6,0, -data- • • 

wnern Nl is 6 and N2 is O which 
tellF the prinrer there will be 6 
data numbers to follow. 

The data numbers teli the 
printer which of the 6 pins to 
fire on the printhead for each of 
the six verticle rows of dots 
that make up the character. For 
example the graphics for the 
special character b are coded as 
f ollowsi 



.TL 0127,75,6,0,0,76.16,16,12.0 

and anytime the special 
cnaracter for zero (shift 2 in 
the TI-WRITER special character 
mode) is encountered in the text 
by the FORMATTER the 

transliterated values will be 
sent to the printer which will 
result in the defined graphics 
character being printed. 

The 6 by 6 grid that was 
printed above was printed this 
way. Four graphics characters 
arc needed to build tne grid. 
They arei 

r I - fff 

The respective de-flnitions arei 

.TL 65:27,75,6,0,255,128,126, 

126,125,126 
.TL 66:27,75,6,0,255.0,0,0,0,0 
.TL 67x27,75,6,0,126,126,126, 

:2£,:26.:2£ 

.TL 66:27,75,6,0,255,126,186, 
186,186,126 

so that anytime A6CII characters 
65, 66, 67 or 66 are encountered 
in the text, the above graphics 
characters will be printed. 
ASCII character 65 is an A, 66 
is a 6, 67l£aC and 66 is a D. 
8o to print the above grid, the 
following pattern of characters 
would be needed I 

^26 AAAAAAB 
64 ADAAAA6 
32 AAAAAAB 
16 AADDAAB 
6 ADAADAB 
4 ADAADAB 
2 AADDAAB 
1 AAAAAAB 
CCCCCC 

Note the numbers will be printed 
just as they appear because they 
have not been redefined. Once 
the graphics have been printed 
the A thru D will have to be 



transliterated back their 

regular character if they are to 
be used in text. The following 
commands will do thisi 

.TL 65i65 
.TL 66:66 
.TL 67i67 
.TL 66168 

There are some limitations 
as a result of working within 
the limits of the FORMATTER. 

1. It appears the physical 
length of the transliterate 
command can not be greater than 

one line. 

2. It also appears that each 
character is limited to 6 
verticle rows of dots. I have 
not been able to print a 
Character longer than 6 rows 
within the FORMATTER. 

3. The FORMATTER insists on 
putting white space on the toe 
and bottom or tne page. Tc 
print graphics that are 
continuous from line to line, as 
is the grid above, reouires a 
line spacing less than that of 
BIX lines per inch. To keep the 
same white space at the bottom 
of the page and on subsequent 
pages will require adjusting the 
line spacing after the graphics 
tc compensate for smaller line 
spacing of tne graphics. 
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TI Writer Formatter Commands 
by Tom Kennedy 

Text Dimension commands ^ as the name implies, move or shape the 
words in the document (margins, linespacing, right justify, etc.) 



. r 1 


« 


! FILL ! 


1 FUib Ao MANi WUKUb UN A iiXiNCj Ao WlLiij rXl« 


.NF 


: NO FILL ! 


I CANCELS FILL. 


.AD 




! ADJUST ! 


! ALIGNS THE TEXT TO THE LEFT AND RIGHT MARGINS. 








! (RT. JUSTIFY) 


.NA 




i NO ADJUST! 


! CANCELS ADJUST. 


.LM 


n ! 


! LF MARGIN! 


! SETS LEFT MARGIN TO "n". 


.RM 


n i 


! RT MARGIN! 


! SETS RIGHT MARGIN TO "n" . 


.IN 


n ! 


i INDENT 


! CREATES AN AUTO-INDENT FROM LEFT MARGIN. 


.LS 


n ! 


! LINE SP ! 


! SETS LINE SPACING TO "n" LINES. 


.PL 


n ! 


! PG LENGTH! 


! DEFINES NUMBER OF LINES TO A PAGE. 


.BP 




! BEGIN PG ! 


! DEFINES FIRST LINE OF NEW PAGE. 



line. 



Internal Format commands control the spacing of characters on a 



.SP n : SPACE 
.CE n : CENTER 



SIMILAR TO THE TAB FUNCTION. 

CENTERS NEXT "n" LINES BETWEEN MARGINS. 



Highlighting commands control functions such as underline or bold 
and allow you to redefine characters to use them to send CTRL codes to 
the printer. 



& 

@ 

,TL XX 
.CO t 



REQUIRED 

SPACE 
UNDERLINE 
BOLD 
TRANS- 
LITERATE 
COMMENT 



JOINS WORDS TOGETHER WHEN REQUIRED TO PREVENT 
SPLITTING IN REFORMATING, UNDERLINE, ETC. 
UNDERLINES ALL TEXT FOLLOWING UNTIL NEXT PACE. 
(OVERSTRIKE) RETYPES FOLLOWING TEXT FOUR TIMES. 
REASSIGNS ONE CHARACTER TO REPRESENT A NUMBER 
OF CHARACTER VALUES TO SEND CODES TO THE PRINTER. 
LIKE REM IN BASIC—ALLOWS NOTES THAT DONT PRINT. 



Page identification commands print notes in the upper or lower 
corner of each page, either headers or footers. 

.HE t : HEADER : PRINTS TEXT (t) AND PAGE NUMBER AT TOP OF PAGE. 
.FO t : FOOTER : PRINTS TEXT (t) AND PAGE NUMBER AT BOTTOM OF PAGE. 
.PA : PAGE # : RESETS PAGE NUMBER IN .HE AND .FO 



File management commands 

.IF f : INCLUDE : MERGES A FILE TO PRINT A DOCUMENT TOO LARGE 
: FILE : TO PRINT AS ONE FILE. 



Mail Merge option commands are used to supply values to the 
variables in a letter that has been set up for the mail merge option 

.ML f :MAIL LIST: IDENTIFIES VALUE FILE (f ) FOR MAIL LIST. 
*n* :VARIABLE : INSERTED IN TEXT AS VARIABLE FOR ASSIGNMENT 

: FROM VALUE FILE. 
.DP n:t:DISPLAY : PROMPTS YOU USING TEXT "t" TO ASSIGN. 
: PROMPT ; ' TO VARIABLE ( *n* ) . 
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fl MHDB DMDU TI-MTER U8ER8 REFERENCE 6UIDE 



SUBMITTED BY BOB STEPHENS 



The fallowing handy TI-WRITER commands are reprinted for the 
June issue of the 99' er News published by the TI Users Group of 
Will County, Romeoville, II. This puts the most used commands on 
one oage for handy access at your computer. 



EDITOR COMMAND 


FCTNICTRL! EDITOR COMMAND 


FCTNiCRTL! EDITOR COMMAND 


FCTNICTRL 


Back tab 
Beginning/line 
Command/escape 
Delete character 
Del. end of line 
Delete line 
Line #'s(on/off) 
Down arrow 
Duplicate line 
Home cursor 


! T ! Ins. Blank line 

I V ; Insert character 
9 I C I Last oaragrapoh 
, 11 F ILeft arrow 

1 K ILeft margin rel. 
3 1 N INew page 
1 INew paragraph 
X 1 A INext paragraph 

! S iNe>ct window 

! L lOops! 


8 1 iQuit 
I 2 ! G .'Reformat 

l6orHI Right arrow 
1 5 I S !Roll down 

1 Y 1 Roll up 
I i9orPI Screen color 

ISorMITab 
! lAOrJIUp arrow 
5 I !Word tab. 
1 llorZIWord wrap/fixed 


!2orR 
D 1 D 
1 4 ! A 

6 i B 

1 "T 
1 ^ 

7 1 I 
' E 1 E 

17orW 

1 ! 


Load files: LF (enter) DSKl. FILENAME (load entire file) 



LF (enter) 3 DSKl . FILENAME (merges filename with data in memory 

after line 3) 

LF (enter) 3 1 10 DSKl . FILENAME (lines I thru 10 of filename are 

merged after line 3 in memory) 
LF (enter) 1 10 DSKl . FILENAME (loads lines 1 thru 10 of filename) 

Save filer; SF (enter; DSKl • FILENAME (save entire file) 

SF (enter) 1 10 DSKl . FILENAME (save lines 1 thru 10) 

FrirxT Fiies:PF (enter) PIO (prints control characters and line numbers) 
PF (enter) C PID (prints with no control characters) 
PF (enter) L PIO (prints 74 characters with line numbers) 
PF (enter) F PIO (prints fixed 80 format) 
PF (enter) 1 10 PIO (prints lines 1 thru 10) 

NOTE: The above assumes PIO. DSKl. FILENAME, and RS232 are also valid! 
To cancel the print command press FCTN 4. 



Delete file:DF (enter) DSKl . FILENAME 



Setting Margins and Tabs: (16 tabs maximum) 

L - Left marain R - Riaht marain I - Indent T - Tab 

Use ENTER'to execute or COMMAND/ESCAPE to terminate command. 

Recover Edit: RE (enter) Y or N 

Line move: M (enter) 2 6 10 (moves lines 2 thru 6 after line 10) 
M (enter) 2 2 10 (moves line 2 after line 10) 



Copy: 



same as move except use C instead of M. 



Find String: FS (enter) /string/ (will look for string in entire file) 

FS (enter) 1 15 /string/ (will look for string in lines 2 thru 15) 



Delete: 



D (enter) 10 15 (deletes lines 10 thru 15 in memory) 
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Bit-Image Graphics on Dot-Matrix Printers 
by Tom Kennedy 



I want to show how you can create your own Basic programs to 
print Bit-Mapped graphics to Dot Matrix printers. In this case^ I use 
program examples in TI BASIC, and refer to Epson compatible printers, 
although similar commands apply to various printers. 

First, what is Bit-Mapped? When you print a file through your 
printer, such as a text file, or a Basic program listing, the 
computer is sending a stream of numbers (Bytes) that represent a 
predefined code for the various letters, numbers, and symbols we can 
generate from the keyboard. The printer acts upon built-in 
programming to convert these bytes to the 7x9 pattern that we think 
of as "A Character". 

When the printer is set to Bit-Image mode, the built-in 
programming is bypassed, and you must supply the data to fire each of 
the pins in the print head (the Bits) to "Map" the graphic you want. 
Considering the number of possible pin positions on a line, with 8 
vertical pins per position, this sounds like a arduous task, but 
there are shortcuts that make it simpler. 

In Bit-Image mode, only the top 8 pins of the 9 pin head are 
used. To fire the pins, you send a byte, in decimal, equal to the 
Binary value of the arrangement of the pins in the head, as 
illustrated below: 



o 


M L 






o 


s s 








B B 




So in this case, if the number 


o 


= 00101110 


= 46 


"46" is sent to the printer, the 


•k 
* 

4r 


(Binary) 


(Dec) 


appropriate pins will fire. 



LSB o 



There are two ways to figure the decimal values for the bytes to 
send. If you are good with Binary/Decimal conversion, or use a 
suitable calculator, just convert the binary number. Otherwise, a 
simpler way to look at it is this: 



o = 128 

o = 64 

o = 32 Find the numbers that coincide with the pins you 

Pin o = 16 want "on", and add them all up. The result is the 

#'s o = 8 decimal value to send. 

o = 4 

o = 2 

o = 1 



So now you can create the bytes necessary to print a vertical 
array of 8 dots, now what? Eight dots do not a picture make. Start at 
the beginning. Draw a picture, preferably on a fine-grid paper. 
After you have the picture on graph paper, you break up the graph 
into 8 squares per row, and try to "frame" the picture in the least 
number of rows, to save effort. Once you have your rows framed off. 
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you can asign the bytes needed to create each 1-bit wide column. 

The procedure for printing the data is to begin by sending the 
string of bytes necessary to invoke bit-mapped mode, then print the 
bytes of data, all as one string. Each separate print statement must 
be preceded with the set-up string, so it's usually simpler to print 
all data for one line all at once. 

So, in the example I'm using, I have set off the field into 
8-dot rows, so I begin by going down the row, column by column, and 
write down the values for the bytes. The first row gives these data 
values: (The {#) is the number of times to repeat the value) 

(32)0,(4)3,(6)12,(2)15,(2)0,(2)15,(4)48,(2)15,(6)0 

To print the first row, you open the printer file. At this point 
you also set the printer to 7/72" line spacing, which is height of 
the print head. Next, you send the "set string", which puts the 
printer in Bit-Mapped mode, and defines how many values will be sent. 
Now you start a loop tat reads in data values and the repetition 
number that prints that data. After all data for one line is read, 
you signify this with a "Wild Card" data value, which terminates the 
loop. Lastly, you send a "CR" and a "LF", which returns the 
carriage. 

Susequent rows are printed by repeating the above steps, except 
for the opening of the printer. 

After all rows are sent, you can reset the printer by sending an 
ESC("@") . 

The following is a BASIC program which demonstrates the above 
procedure. Although written in TI Extended BASIC, the procedure is 
the same in any BASIC. 

90 REM WRITTEN IN TI EXTENDED BASIC 

100 REM THIS EXAMPLE PRINTS A FROG HEAD, IN BIT MAPPED GRAPHICS 

110 REM DATA IS READ IN FORM OF: REPETITION, VALUE 

120 REM WHICH PRINTS RPT$ (CHR$ (VALUE) , REPETITION) 

130 REM 

140 REM by Tom Kennedy December, '85 

150 REM (206) 248-2218 

160 REM 

170 REM *****INIT VARIABLES (OPTIONAL) ********************** 

180 P$="PIO.CR.LF" :: E$=CHR$ ( 27 ) : : CR$=CHR$ ( 10 ) &CHR$ ( 13 ) : : 

SET$=E$&"K"&CHR$ ( 60 ) &CHR$ ( ) 

190 REM OPEN PRINTER & SET LINE SPACE TO 7/72"***************** 

200 OPEN #1:P$ :: PRINT #1 :E$&CHR$ ( 49 ) &CR$ 

210 REM *********** BEGIN PROGRAM ***************************** 

220 FOR R0W=1 TO 5 : : PRINT #1:SET$ 

230 REM ***READ DATA, CHECK FOR END-OF-LINE******************** 

240 READ NMBR, VALUE :: IF NMBR=99 THEN 270 

250 REM *******PRINT DATA FOR ONE LINE************************* 

260 FOR ByTE=l TO NMBR :: PRINT #1 :CHR$ (VALUE) : : NEXT BYTE :: GOTO 240 

270 PRINT #1:CR$ :: NEXT ROW 

280 REM ********RESET PRINTER (OPTIONAL) *********************** 

290 PRINT #1:E$&"@" 
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300 REM ******************************************************* 

310 REM DATA VALUES = "REPETITION NUMBER, BYTE VALUE''************** 

315 REM ********"99,99" SIGNIFIES END-OF-LINE********************* 

320 DATA 32,0,4,3,6,12,2,15,2,0,2,15,4,48,2,15,6,0,99,99 

330 DATA 24,0,2,3,2,15,2,63,6,255,2,0,4,63,2,255,2,243,2,192, 

4 252 2 255 6 99 99 

340 DATA 20^0^2^15, '2, 63, 6, 255,2,252,4,240,6, 48, 2, 240,2, 0,8, 192, 2, 
240 2 60 2 15 99 99 

350 'data' 16, 0,^2, 3, 6, 255, 2, 192, 6, 0,2, 255, 10, 12, 8, 48, 2, 192, 2, 
195,2,204,2,240,99,99 

360 DATA 6,0,4,15,4,63,10,255,8,0,2,192,12,0,2,3,2, 
12,2,48,2,192,6,0,99,99 

Everything I've covered so far is on printing graphics, but 
there is more to the Bit Image modes. In the above example, I used 
the ESC("K") to set the mode, but there are actualy eight modes to 
chose from. The modes are numbered to 7, with (ESCl^K")) being 
the simplest. The following table lists the modes. 



MODE 


DENSITY 


ALTERNATE 
CODE 


DESCRIPTION 


HEAD SPEED 
(in/sec) 





SINGLE 


ESC K 


60 DOTS PER INCH 
480 DOTS PER LINE 


16 


1 


LOW SPEED 
DOUBLE 


ESC L 


120 DOTS PER INCH 
960 DOTS PER LINE 


8 


2 


HIGH SPEED 
DOUBLE 


ESC Y 


SAME AS MODE 1, BUT 
FASTER. CONSECUTIVE DOTS 
NOT PRINTED. 


16 


3 


QUADRUPLE 


ESC Z 


240 DOTS PER INCH 
1920 DOTS PER LINE 
CONSECUTIVE DOTS NOT 
PRINTED. 


8 


4 


CRT 1 


NONE 


80 DOTS PER INCH 
640 DOTS PER LINE 
SAME DENSITY AS 
EPSON QX-10 COMPUTER 


8 


5 


ONE-TO-ONE 
(PLOTTER) 


NONE 


72 DOTS PER INCH 
576 DOTS PER LINE 
EQUAL DENSITY IN BOTH 
HORIZONTAL & VERTICAL. 


12 


6 


CRT II 


NONE 


90 DOTS PER INCH 
720 DOTS PER LINE 


8 


7 


DUAL 

DENSITY 

PLOTTER 


NONE 


144 DOTS PER INCH 
1152 DOTS PER LINE 
TWICE DENSITY OF MODE 5 


3 
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All modes can be activated with the sequence ESC("*")f followed 
by the mode number. Modes 0-3 also have the alternate ESCape value 
(K^L,Y,&Z). In this tutorial/ I will deal with these four, and in 
most cases you will only use the first two. 

The difference between mode (ESC("K")) and mode 1 (ESC("L")) 
is that in mode one dot is printed spaced at the width of the print 
head pins. In mode 1^ a dot is printed every 1/2 pin width , producing 
double density. 

Mode 2 (ESC("Y")) is the same as mode 1, except twice as fast. 
The speed is attained by not printing consecutive dots in a row. This 
feature might be a problem in fine detail ^ such as lettering, but not 
when printing a large graphic, such as a screen dump. Mode 3 
(ESC("Z") is the same as mode 1, but a dot is printed every 1/4 pin 
width, and consecutive dots are omitted. 

The second part of the set-up string, after the mode values, are 
the numbers that define how many columns, or dots, will be printed 
per row. Remember, this is not the same as how many characters per 
inch might be defined when selecting a font in normal print modes. 

The numbers, nl & n2, combine together to determine the value. 
n2 is equal to the number of times 256 will divide into the desired 
value, and nl is the remainder. For example, if you wanted to print 
500 dots per row, 500/256=1 with 244 remaining, so the set-up string 
to print 500 dots per row in double density is: 

CHR$ ( 27 ) &"L"&CHR$ ( 244 ) &CHR$ ( 1 ) 

In my program example I print 60 dots in single density. Since 
60/256<0, n2=0 and nl is the total number of dots. This is true for 
any value under 256. 

If the number of dot columns will change in your application, 
the best thing is to initialize two variables, to calculate nl and n2 
for any width, as shown: 

10 X=Z-(INT(Z/256)*256) 
20 Y=INT(Z/256) 

3 SET$=CHR$ ( 2 7 ) & " L " &CHR$ ( X ) &CHR$ ( Y ) 



100 Z=500 

110 PRINT #1:SET$ 



200 Z=140 

210 PRINT #1:SET$ 

This may sound like a crazy way to send a number to the printer, 
but it's necessary because the data must be sent as Hexidecimal 
numbers, two digits per number. The largest two-digit Hex number is 
>FF, which equals 255, so everything goes in chunks of 255 or less. 
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The I^est of the Meal-Appendixes 



Inscebot, Inc. 

P.O. Box 260 

Arnold, Maryland 21012 

CSI Design Group 

P.O. Box 50150 

St. Louis, Missouri 63105 

DataBipTics 
P.O. Box 1194 

Palos Verdes Estates, CA. 90274 

SST Software 
Box 26 

Cedarburg, Wiscx)nsin 53012 
(414) 771-8415 

McCann Software 
P.O. Box 34160 
Omaha, Nebraska 68134 



Heim Industries 
P.O. Box 296 
Clifton Park, NY 12065 

Bright Micro Koihputers 
2781 Resor Road 
Fairfield, Ohio 45014 

Trinity Systems 
1022 Grandview 
Pittsburg, PA 15237 

Great Lakes Software 
804 E. Grand River Avenue 
HowelL, Michigan 48843 



Intelpro 

5825 Baillargeon Street 

Brossard, Quebec, Canada J4Z ITI 
(514) 656-8798 



Mail-order Distributors 



Bits and ChJ-OS 
23637 EWY 99* 
Edmonds, Washinctx)n 
(206) 775-7390 

Tenex Computer Express 
P.O. Box 6578 
South Bend, Indiana 46660 
(219) 259-7051 

Tribon Produces, Inc. 
P.O. Box 8123 

San Francisco, Calif. 94128 
1-800-227-6900 

Computer Micro Products 
2460 Wisconsin Avenue 
Downers Grove, Illinois 60515 
(312) 960-1950 

Ramsoft Enterprises 

1501 East Chapman Avenue 

Suite 338 

Fullerton, California 92631 



Hunter Elect2ronics 

604 S. Fairview Avenue 

Elmhurst, 111. 60126 
(312) 832-6558 

Spedaiist: In 
821 Excelsior 
Hopkins, Minnesota 
(612) 938-3161 

Tex-Comp 
P.O. Box 33034 
Granda Hills, Ca 91344 
(818) 366-6631 

Pilgrim's Pride 

219 N. York Rd. 
Hatboro, PA 19040 
(215) 441-4262 

Texaments 

53 Center Street 
Patchogue, N.Y. 11772 



Disk Only Software 
P.O. Box 244 
Lorton, Virgiiiia 22079 



or call 

1-800-446-4462. At the tone, enter 897335 for recorded order message. Touchtone phone is required 
Alternate is (301) 369-1339. No Touchtone is required. 
Delphi: TELEDATA— CompuServ^e: 74405.1207— MCI: TDG— TELEX: 6501106897 MCI 



TI Product Sources 
compiled by Ron Albright 



What follows is a sort of "who's who" and "where to look" for 
various support services for the TI 99/4A Home Computer, The list 
will include commercial concerns , and public (often free) sources of 
information. It is certainly not comprehensive but, the author has 
made every effort to check information such as addresses and phone 
numbers, but cautions the reader that these are subject to change. 

Hardware 



Corcomp, Incorporated 
2211-G Winston Road 
Anaheim, California 92806 
(714) 956-4450 

My arc, Inc. 

241 Madison ville Road 

Basking Ridge, New Jersey 07920 



Miner's Graphics 
1475 W. Cypress Avenue 
San Dimas, California 91773 
(714) 599-1431 

Ryte Data 

210 Mountain Street 
Hal i burton, Ontario 
Canada KOM ISO 
(705) 457-2774 



AEI 

P.O. Box 10306 
RockviUe, Maryland 20850 



Captain's Wheel 
17295 Chippendale 
Farmincrtxjn, MN 5024 
(612) 460-6348 

Rave 99 
23 Florence Road 
Bloomfield, CT 06002 



Dijit Systems 
4345 Hortensia Street 
San Diecc, California 92103 
(619) 295-3301 



Horizon Computer Limited 
P.O. Box 554 
Walbridge. Ohio 43465 

Software 



Tigercub Software 
156 Col ling wood Avenue 
Columbus, Ohio 43213 
(614) 235-3545 

Asgard Software 
P.O. Box 10306 
RockviUe, Maryland 20850 

Millers Graphics 

1475 West Cypress Avenue 

San Dimas, California 91773 



Ryte Data 

210 Mountain Street 
Hal i burton, Ontario, Canada 
(705) 457-2774 

Quality 99 Software 
1884 Columbia Road #500 
Washington, DC 20009 

DataBioTics 
P.O. Box 1194 

Palos Verdes Estates, Calif. 90274 



Replacement Parts/Surplus: 



Arnold Company 
P.O. Box 512 
Commerce, TX 75428 
(214) 395-2922 
(Keyboards) 



Lolix 

13933 N. Central #212 
Dallas, TX 75243 
(214) 234-8056 
(Keyboards, Power Supplies, 
cassette cables) 



Repairs 



Daymen Fikes 

Texas Instruments Attn: Repair 
2305 N. University 
Lubbock, TX 79415 
(806) 741-2321 

National Organizations (Membership fees required) 



99/4A National Assistance Group 
Box 290812 

Fort Lauderdale, Florida 33329 
(305) 583-0467 



99 Users Group Association 
3535 Sou-di E. Street 

Bakersfj.eld, Calif. 93304 
(805) 397-4361 



National Non-Prcfit Assistance (Information, Public-Domain Scfrware) 



Amnion Helpline 

116 Carl Streer 

San Francisco, Calif. 94117 

(415) 753-5581 



National Telecom unication Networks 



Compuserve 

5000 Arlington Center Bl\^d. 
P.O. Box 20212 
Columbus, Ohio 43220 
(800) 848-8990 



The Source 
1616 Anderson Road 
McLean, Vircinia 22102 
(800) 336-3330 



GEnie 

401 N. Washington Street 
Rockville, Maryland 20850 
1-800-636-9636 ^ 



Delphi 

3 Blackstone Street 
Cambridae, Mass 02139 
1.800-544^005 



Bulletin Board Software 



Commercial 



BBS System 

1411 N. 36th 

Melrose Park, II. 60160 
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Freeware: 



TIBBS(tm) 
P.O. Box 383 
Kennesaw^ Georgia 30144 
(404) 425-5254 



Techie Bulletin Board 
Monty Sdmidt 
525 Wingra Street 
Madison, Wisconsin 53714 



Scx)tt Darling 
W. 5515 Wbodside 
Spokane, Vfeshington 99208 



Public Domain 



TI-CQMM 
John Clulow 

345 West South Boundary 
Perrysburg, (Xiio 43551 



Pro-99er BBS 
Mark Hoogendoome 
21 Long Street 

Burlington, Massachusetts 01803 



Publications 



Micropendium 

P.O. Box 1343 

Round Rock, Texas 78580 

(512) 255-1512 



Smart Programmer 
171 Mustang Street 
Sulphur, Louisiana 70663 



Coroxiter Shopper 

407 S. Washington Avenue 

P.O. Box F 

Titusville, Florida 32781 
(305) 269-3211 

R/D Newsletter 
210 ^fountain Street 
HaldLburton, Ontario 
Canada KQM ISO 



TRAVelSR Genial Ccnputervare 
835 Green Valley Drive 
Philadelphia, Penns\'lvania 19128 
($30/year, 6 issues of a •^magazine 
on disk"; a flippi' disk vdth 720 
sectors of programs/utiliries ) 



Eairware Listing 



[Note: It is stror^ly suggested by the author to contact by mail the 
authors listed below inquiring whether their offerings are still available 
before sending disk or paynent. Further, include a self -addressed, stanped 
envelope to ensure a tiinely reply. While the author has made every effort 
to provide factual and current information in this listing, he cannot 
assume any liability for problems encountered as a result of inadvertent 
errors.] 

MASSCOPY Steve Lawless 2514 Maple Avenue, Wilmington, Delaware 19808 
Disk doner 

NEATLIST Danny Michaels Route 9, Box 460 Florence, AL. 35630 
Programnning utility 
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SCREENDUMP Danny Michaels (See Above) 
Screen dump printer utility 

FAST-TERM Paul Charlton 1110 Tinehurst Court Chalottesville, VA 22901 
Terminal Emulator 

EASYSPRITE Tom Freeman 515 Alma Real Dr., Pacific Palisades, CA 90272 
Programming utility for graphics 

DISASSEMBLER Marty KroU 218 Kaplan Avenue Pittsburg, P, 15227 
Disassembler programming utility 

Checkbook and Budget Manager by John Taylor, 2170 Estaline Drive, 
Florence, Alabama 35630; Household budgeting and finance management 

Games; John Taylor (see above address); collection of commercial quality 
games and educational activities for children and adults. $5 or disk and 
mailer and return postage. 

Director '99' Robert Neal/Ed Bert, P.O. Box 216R, Romeoville, II. 60441 
Disk catalog database program 

PRBase William Warren, 2373 Ironton Street, Aurora, Colorado 80010 
Database program 

Best Songs 1 and 2; Music written by Bill Knecht, 815 Yorkshire, Pasadena, 
Texas 77503. $5 for one disk, $8 for^both. 

Doors to Eden and First Days in Eden; Steven Cheairs, P.O. Box 27547, 
Albuquerque, NM 87125. Two games to be used with the TI Adventure Module. 
Author asks a $2 donation at the time the games are ordered; 2 disks or 2 
cassettes. 

Sprint DtiliJ^^; Ken Houle, 27721 W. Wakefield Rd., Saugus, CA 91350. 
Utiliry for Aseembly programmers to dump DV80 files to printer or disk. 

Printout; Steven Mehr, 633 HoHybume Lane, Thousand Oaks, CA 91360. XB 
utility to printout DV80 files wit printers with many options. $5 plus 
disk and mailer. 

Pilot 99; by Tom Weithofer (deceased). As a service to the TI community. 
Dr. Jim McCulloch (9505 Drake Avenue, Evanston, IL 60203) will send a copy 
of this fine programming language to anyone who sends two disks / self- 
addressed mailer and sufficient postage. 

Pas-Tran; Bill Harms, 6527 Hayes Court, Chino, CA 91710; 
checkboo/spreadsheet program with easy linking to Multiplan. 

Weather Forecaster; Garry Cox, 3174 Melbourne, Memphis, TN 38127; Graphics 
and home weather prediction. 

For a complete List of Freeware, send $1 to MICROpendium, P.O. Box 1343, 
Round Rock, Texas 78680. The list they have is verified and up-to-date and 
now is 10 pages long. Support this valuable source of TI software - 
support Freeware. 
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User Group List 
Courtesy of Art Byers and the 
Westchester 99er's User Group 



Summit 99ers Users Group 

0. Box 3201 
Cuyohoga Falls, Ohio 44223 



Fox City Users Group 
P. 0. Box 2553 
Appleton, Wisconsin 



54913 



Atlanta 99/4A Computer Users 

P. 0, Box 19841 

Atlanta, Georgia 30325 

North New Jersey TI Users Group 
16 Judith Ann Drive 
Ringwood, New Jersey 07456 

Mid Illinois Computer Resource 
P. 0, Box 766 

Bloomington, Illinois 61701-0766 

Boise 99'ers Computer Club 

1331 Colorado Avenue 

Boise, Idaho 83706 

NorthEast Iowa Home Computer User' 
1528 Longfellow % Terry Maxfield 
Waterloo^ Iowa " 50703 

Central Ohio Ninety-Niners., Inc. 
8055 Simfield Road % D. Heim 
Dublin, Ohio 43017 

Airport Area Computer Club 
P. 0. Box 710 

Coraopolis, Penn. 15108 

The Daytona 99ers 

P. 0. Box 15232 

Daytona Beach, Florida 32015 



Rocky Mountain 99ers 
P. 0. Box 12605 
Denver, Colorado 



216-456-0450 



414/766/3515 



404-233-3096 



309/962/9305 



208/344/1409 



614/858/0632 



904/427/8532 



303/759/0699 



80212 



Central Iowa 99/4A Users Group 515/266/7788 
P. 0. Box 3043 

Des Moines, Iowa 50316 



Users Group of Orange County 
17301 Santa Isabel Street 
Fountain Valley, Calif. 92708 

L A 99ers Computer Group 
P. 0. Box 3547 

Gardenia, California 90247-7247 

99/4A Minn & Dakota Home User 

509 Reeves Drive 

Grand Forks, N. Dakota 58201 

Grand Rapids 99er Users Group 

1419 Laughlin Dr. N. W. 

Grand Rapids, Michigan 49504-2423 

Johnson Space Center Users Group 
2321 Coryell St. % John Owen 
League City, Texas 77573 

Net 99er Home Computer Group 
P. 0. Box 534 

Hurst, Texas 76053 

Kankakee TI Users Group 
P. 0. Box 1945 

Kankakee, Illinois 50901 

Mid Atlantic Ninety Nine'ers 
P. 0. Box 267 

Leesburg, Virginia 22075 



213/439/0785 



213/439/0785 



701/772/6180 



616/791/0059 



???/337/4110 



817/656/1473 



703-777-2017 



Titex TI Users Group 
36 Fox Place 
Hicksville, New York 



11801 



516/796/8359 



Kentuckiana 99/4A Computer Society 
P. 0. Box 36246 

Louisville, Kentucky 40233-6246 



812/923/3888 



St. Louis 99ers 
P. 0. Box 63158 
St. Louis, Missouri 



63163 



314/428/0752 



Greater Orlando 99ers Users Group 305-293-0769 
P. 0. Box 1381 

Mai tl and, Florida 32751 

Greater ftnaha TI-99/4A User's Grou 402/556/0702 

11215 Crippen Circle 

Omaha, Nebraska 68138 



Pomona Valley 99/4A Users 'Group 
1833 E. Princeton St. % C. Perez 
Ontario, California 91764 

Miami County Area 99/4A Users Grou 
P. 0. Box 1194 

Peru, Indiana 46970 

Bluegrass 99/4 Computer Society 
P. 0. Box 11866 

Lexington, Kentucky 40578-1866 

T. I. Users Group of Will County 
P. 0. Box 216R 

Romeoville, Illinois 60441 

Great Lakes Computer Group 
P. 0. Box 7151 

Roseville, Michigan 48305 

MSP 99 Users Group 

P. 0. Box 12351 

St. Paul, Minnesota 55112 

The Suncoast Beeper 

8421 Westridge Drive 

Tampa, Florida 33615 

N. W. Suburban 99 Users Group 

1211 Freeman Road 

Hoffman Estates, 111. 60195 



Upper Pinellas 99 'er User Group 
P. 0. Box 3031 

Seminole, Florida 33542 

Mid/America 99 Users Group 
5936 Kardy 

Merriam, Kansas^ 65202 

Lima Area 99/4A User Group 

2225 High Ridge 

Lima, Ohio 45805 

New Jersey Users Group 

49 Pine Grove Ave. % Mel Gary 

Somerset New Jersey 08873 

W.W. 99'ers of Champaign/Urbana 
2020 Rebecca Drive 
Champaign, Illinois 61821 



714/984-4107 
219/563/2213 
606/268/0210 
815/886/6552 
313/623-7926 
612/429-5256 
813/347-6942 
312/980/9234 

813/736-1616 

201/686/5619 
217-344-5281 



Tidewater 99/4 Users Group Inc. 
P. 0. Box 1935 

Newport News, Vir. 23601 



804/596-6450 



Milwaukee Area 99-4 User Group 
4122 North Glenway 
Wauwatosa, Wisconsin 53222 

Cin-Day User's Group 
P, 0. Box 519 

West Chester, Ohio 45069-0519 

K-Town 99/4A Users Group 

116 Richards Drive 

Oliver Springs, Tenn 37840 

Shoals 99'ers 
P. 0. Box 2928 

Muscle Shoals, Alabama 35662 

Long Island 99 'er Users Group 
P. 0. Box 544 

Deer Park, New York 11729 
West Penn 99ers 

R. R. 1 Box 73A % J. F, Willforth 
Jeanette, Pennyslvania 15644 



414/264/4735 



513/777/0110 



205-776-2032 
516-567-5462 

412-271-6283 



Wiregrass 99 'er User's Group 
Att. Newsletter 102 Auburn Dr. 
Enterprise, Alabama 36330 

Jacksonville TI-99/4a Users Group 
P. 0. Box 525 

Jacksonville, Arkansas 72076 

Bavou 99 Users GrouD 
P. 0. Box 921 

Lake Charles, Louisiana 70602 

Brazos Valley 99'ers 
P. 0. Box 7053 

Waco, Texas 76714 

Edmonton Users Group 
P. 0. Box 11983 

Edmonton, Alberta Cana T5J 3L1 

The Ottawa T. I. 99/4 Users Group 
P. 0. Box 2144 Station D 
Ottawa, Ontario Canada KIP 5W3 



501/962/971C 
318/477/3687 

817/848/4589 
403/467/6021 

613/837-1719 



Wichita 99er's Users Group 
R.R.5 Box 13 % Guy Hulsey 
Winfield, Kansas 67156 



316/221/7148 



Lower Michigan 99/4A users Group 
P. 0. Box 885 

Troy, Michigan 48099 

Northwest Ohio 99 'er News 419/666/4945 

5926 Ranbo Lane 

Toledo, Ohio 43623 

The Central Westchester 99'ers Clu 914/961-5993 
1261 Williams Dr. % A. Byers 
Scrub Oak, New York 10588 

Magnetic (TI 99/4A) 
57 River Road 

Andover, Massachusetts 01810 



Amarillo 99/4A User Group 
P. 0. Box 8421 

Amarillo, Texas 79114-8421 

Quad Cities Computer Club 
P. 0. Box 1124 

Bettendorf, Iowa 52722 

Boston Computer Society TI user Group 
One Center Plaza % J. P. Hoddie 
Boston, Massachusetts 02108 

The Windy City 99 Club 

640 N. LaSalle R. 280 % M. Mickels 

Chicago, Illinois 60610 

Corpus Christi 99ers Users Group 
5205 Tartan 

Corpus Christi, Texas 78403 

Decatur 99er Home Computer Users 
P. 0. Box 726 

Decatur, Illinois 62525 

• 

San Diego Computer Society T I Sig 
P. 0. Box 83821 
San Diego, California 92138 

Southern California Computer Group 
P. 0. Box 21181 
El Cajon, California 92021 

Eugene 99/4A User Group 
P. 0. Box 11313 
Eugene, Oregon 97440 



806/359-0380 



617/353/7369 



312/337/5997 



512-852-4874 



217/877-1531 



619-296-9386 



619/462/5802 



503-747-1768 



The Forest Lane Users Group 
4413 Cornell Drive % J. Gillo 
Garland, Texas 75042 



214-480-1302 



Mid-South 99/4A Users Group 
P. 0. Box 38522 

Germantown, Tennessee 38183-0522 

Nutmeg TI-99ers 

10 Jolly Road % J. Ryan 

Ellington, Connecticut 06029 



901/363/6273 



203/875/1647 



Hoosier Users Group 
P. 0. Box 2222 

Indianapolis, Indiana 46206-2222 

Dallas TI Home Computer Group 

1221 Mosswood Place 

Irving, Texas 75061 

Kansas City TI99/4A Computer U. G. 

P. 0. Box 12591 

North Kansas City, Mo. 64116 

Syracuse T I 99/4A Users Group 

144 Hillside Way 

Camillus, New York 13031 

Lincoln 99 Computer Club 
4501 South 50th Street 
Lincoln, Nebraska 68516 

Puget Sound 99ers 
P. 0. Box 6073 

Lynnwood, Washington 98032 
Madarea 99'ers 

437 W. Gorham % Wise. Blue Print 
Madison, Wisconsin 53703 

Miami 99/4A Users Group 

19301 NE 19th Avenue 

N. Miami Beach, Florida 33179 



317/631/7255 



214/239-6829 



913-371-1092 



315/625/4409 



402-489-2364 



608/648-2883 



305-257-2102 



Texas Instruments Baltimore Users Group 
P. 0. Box 3 

Perry Hall, Maryland 21128 

Fox Valley Users Group 312/931/0360 

34W.762 S. James Drive 

St. Charles, Illinois 60174 



Siouxland 99'ers 

4604 Bluestem Circle 

Sioux Falls, South Dak 57106 



605/338/7050 



The Michiana 99/4A User's Group 219/277/1990 

911 Dover Drive 

South Bend, Indiana 46614 

Ninety-Niners of the Vancouver Are 206/693/7070 
P. 0. Box 508 

Vancouver, Washington 98666 

Northern NJ Ninty Niner Users Group 201-234-1488 
P, 0, Box 515 

Bedminister,, New Jer. 07921515 



The Downeast 99er's 
P. 0. Box 542 

Westbrook, Maine 04092 



Cleveland Area 99/4A Users Group 216-274-254^ 

P. 0. Box 23283 

Euclid, Ohio 44123 



Cross Roads '99ers Computer Group 
P. 0. Box 293 

York, Nebraska 68467 

Pekin Users Group 

559 Chicaqo Street 

East Peoria, Illinois 61611 

Carnation Citv 99'erc User Group 216/823/8958 
205 Fernwood Blvd % D. S. Brain 
Alliance, Ohio 44601 



Greater Dayton 99'ers 513/835/5918 
P. 0. Box 248 

Englewood, Ohio 45322-0248 

San Fernando 99ers 818-507-6219 
P. 0. Box 1844 

Canyon Country, Calif 91351 

The Fort's User Group 219-432-1228 
P. 0. Box 11212 

Fort Wayne, Indiania 46856-1212 



Peeks and PCrES 

Conpiled by Scott Darlir^ 
GEnie ID TIKSOPT 

24K OF DATA STORAGE 

If you need to work with quite a bit of data or would like to change 
programs, but save the data after you press CALL QUIT then you can set up the 
24K of High-MOTory in the PEB as a single data file called "EXPMEM2", you open 
this file just as you would a disk file with one exception - you must PRECEED 
th tFEN statement with a CALL LOAD to the location -24574 as follows: 

For INTA^ files - 24 
For DIS,A7AR files - 16 
For INTT/^IX files - 8 
For DIS./FIX files - 

Heres and exarrple: 

If you want to* open up the Expansion Itenory for Display .Variable 80 files 
this is what you'd do: 
100 CALL^INTT 
110 CALL LOAD (-24574, 16) 

120 QPIN #l:"EmiEM2",RELATIVErDPDAIE, DISPLAY 80 
Tben continue on as you normally would • 

If you want to store both data and assembly language routines at the saioe 
time do this: 

100 CALL JKHH 

no CALL L0AD(-24574,-16) 

120 CPrN #1:"EX?^EM2" 

130 CALL LOAD CDSKl.ASSMl'') 

140 CALL LOAD ("DSK2.ASSM2") 

150 CALL LINK ("START'') 

160 REM CONTINDE REST OF PROGRAM 

In the above exanple the 24 K of high-cremory was saved for use as a DATA 
file (DIS/VAR 80 format) then the assenbly routines were loaded. The computer 
wll look for the best place to put the routines and will adjust the pointer 
accordingly. After the routines are loaded^ a LINK statement starts the first 
rutine and off we go. 

If that's not enough for you, you can also use the .MINI-MEMORY for 4K more 
of*^ storage of asserbly routines! Nw that's 16K of program space, 12K of 
assa±)ly routine space! 

********************************************************** 



These are all of the Peeks & Pokes that I have cxxne across for use with X-Basic 

and 32K itemory expansion (be sure to do a "CALL INIT") . The P & Q variables 

are \:ised for "PEEK" - the numbers are for "POKE" or "LOAD". 
*********************************************************************** 



NXS(ESS , VAU]E(S) MEANING IN EXTENDED BASIC 



8192 
8194 
8196 
-28672 
-31572 
-31740 
-31744 
-31748 
-31788 



-31794 
-31804 

-31806 



-31808 
-31860 

-31866 
-31868 



-31873 
-31877 
-31878 
-31879 
-31880 
-31884 
-31888 

-31931 



TO 255 

, Q 

TO 15 



P 

P 


TO 255 

160 

192 

224 

225 

226 

227 

232 

P 

X , Y 

P 



16 
32 
48 
64 
80 
96 
128 

P , Q 

4 

8 

P f Q 


, 
255 , 231 
3 TO 30 
P 
P 
P 
P 


63 
55 

2 
4 

14 
15 
16 
64 
128 



TO 



5 

255 
215 



CALL VERSIGN(X) IF X=100 100= NEWEST VERSION OF X/S CART 
USE (PEEK,P) IF P<> 70 OR 0121 THEN DO A CALL INIT 
FIRST FREE ADDRESS IN LCW MEMORY 
LAST FREE AIX>RESS IN LOW MEMORY 

P=0 SPEECH NOT ATTACHED P=96 OR P=255 SPEECH IS ATTACHED 
VARY KEXBOARD RESPONSE 

PUT IN DIPPEJ^ENT TO CHANGE BEEPS, WARNINGS, ETC 

OC»inNUATI0N OF LAST SOUND (0=IOUD 15=S0Pr) 

CHANGE THE CURSOR FLASHI1«3 AND RESPC»ISE TMIE RATES 

BLANK OUT THE SCREEN (MUST PUSH A KEY TO ACTIVATE) 

NO AUTOMATIC SPRITE MOTION OR SCHJND 

NORMAL OPERATICN 

MAGNIFIED SPRITES 

D(X]BLE SIZE SPRITES 

MAOTIFIED & DOUBLE SIZED SPRITES 

MULTICOLOR MCH)E (48 BY 64 SQUARES) 

TIMER FOR CALL SOUND (COUNTS PRCM 255 TO 0) 

RETURN TO OHE TITLE SCREEN (USE "PEEK (2,X,Y)") 

CHANGE THE CURSOR FLASH RATE (0 TO 255) 

NORMAL OPERATION 

DISABLE C3UIT KEY (FCTN =) 

DISABLE SOUND (USE NBG DUR FOR CONTINOUS SOUND) 

DISABLE SOUND & QUIT KEY 

DISABLE AOTO SPRITE MOTICN 

DISABLE SPRITES & QUIT KEY 

DISABLE SPRITES AND SOUND 

DISABLE ALL THREE 

DOUBLE RANDOM NGMBERS (0 TO 255) NEED "RANDOMIZE" 

GO FROM EX-BASIC TO OOJSOLE BASIC (NEED "NEW" ) 

AUTO RUN OF DSKl.LOAD 

END OF CPU PROGRAM AEORESS (P*256-K2) 

NO "RUN" OR "LIST" AFTER "BREAK" IS USED 

TURNS OFF THE 32K MEMORY EXPANSION 

TURNS ON THE 32K MEMDRY EXPANSION 

SCREEN COLUMN TO START AT WITH A "PRINT" 

P&32 = SPRITE COINCIDENCE P&64 = 5 SPRITES ON A LINE 

HiaffiST NUMBER SPRITE IN MOTION (0 STOPS ALL) 

TIMER FOR VDP INTHWUPTS EVERY 1/60 OF A SEC (0 TOP 255) 

RANDOM NUMBER (0 TO 99) NEED "RANDOMIZE" 

CHANGE KEXBOARD M»E (LIKE "CALL KEy(K,...)") 

DISABLE ALL DISK EHOVES (USE "NEW" TO FREE MEMCHY) 

ENABLE ALL DISK DRIVES (USE "NEW" TO FREE DRIVES) 

UNPROTECT X-B PROTECTION 

SET "ON WARNING NEXT" 0GM4AND 

SETT "ON WARNING STOP" COMIAND 

SET "UNTRACE" O0M4AND 

SEH! "UNTRACE" C0M4AND & "NUM" OC^WAND 

SET "TRACE" OOtMAND 

SET "ON BREAK NEXT" O0(*1AND 



PROTECT X/B PROCSAM 



A-18 



-31952 




P 


PEEK P=55 IHEN 32K EXPANSIC»I MEMORY IS OFF 055 MEANS ON 


-31962 




32 


RETURN TO THE TITLE SCREEN 






255 


RESTART X/B W/DSKl.LOAD 


-31974 




P , Q 


END OF VDP STACK ADDRESS (P*256-K3) 


-32112 




8 


SEARCHES DISK FOR ? 


-32114 




2 


RANDOM GARBAGE 






13 


SCREEN GOES WILD 






119 


PRODUCE LINES 


-32116 




2 


RANDOM CHARACTERS OA SCREEN 






4 


GO FROM X/lBASIC TO BASIC 


-32187 







UNPROTECT XB PROGRAM 






2 


SEP "C»J WARNING NEXT" CCM4AND 






4 


SET "OiJ WARNING STOP" 0CM1AND 






9 


SET LINE NUMBER 






14 


SET "ONTRACE" COMMAND 






15 


SET UNTEy^CE OOMMAND & NuM UJ^1MA^ID 






16 


SET "TE^CE OQMMRND 






64 


SET "O^ BREAK NEXT" C3CM1AND 






128 


PROTECT XB HROGRAM 


-32188 




1 


CHANGE CXDDOR AND RECEIVE SYNTAX EElROl 






127 


CHANGE COLOR AND RECEIVE BREAKPOINT 


-32630 




128 


RESET TO TITLE SCREEN 


-32699 







UNPROTECT XB PROGRAM 






2 


SET "OSI WARNING NEXT" COMMAND 






4 


SET "ON WARNING STOP" OCMIAND 






14 


SET "UNTRACE" COMMAND 






15 


SET "UNTRACE" & "NUM" CCMMAND 






16 


SET "TRACE" COMMAND 








ciFrp "ON BREAK NEXT" 






128 


PROTECT XB PROGRAM 


-32700 







CLEARS CREEN FOR AN INSTANT 


-32729 







RUN "DSKl.LOAD" 


-32730 




32 


RESET TO TITLE SCREEN 


-32961 




51 


RESET TO TITLE SCREEN 






149 


SETS "ON BREAK GOTO" LOCKS SYSTEM 


Ihe follwoing Loads require E/A or Minimeroory: 






VMitJE(S) 


MEANING 


784 




P 


USE POKEV(784,P) (WHERE P IS 16 TO 31) CHANGES BACKGROUND 








COLOR OF CURSOR 


-24574 




8 


I THINK raiS ALLOWS THE MINI-MEM TO USE OHE 24K FOR STORAGE 


-30945 







WHITE EDGES 


-32272 


t 


, , 


-30945 , ) WILL POT YOU IN TEXT MODE 


-32766 







BIT MAP MM)E 


-32768 


t 





GRAPHICS (NORMAL MODE) 


-32280 







MULTI-COLOR MODE 


-32352 




107 


WILL BLANK THE SCREEN, ANY KEY PRESS WILL RESTORE 



* PASCAL LOADS 



14586 , , THIS ALLOWS YOU TO DO A "RUN-TIME WARM START" FRCM PASCAL 
TO BASIC A-19 



TI Console Memory Map 
Conpiled by Robert Coffee 



1 Coninanications Register Unit 8K| 
+ + 

Let's run down the CRU again. 

• 

>0000-03FE CRU TMS 9901 space ^ required. 

>0404-10FE For test equipment use on production line. 

>1100-11FE Disk Controller. 

>1200-12FE Mod^. 

>1300-13FE Primary RS232, serial ports 1 & 2 and parellel port #1. 

>1400-14FE Unassigned. 

>1500-15FE Secondary RS232, serial ports 3 & 4 and parellel port #2. 

>1600-16FE Unassigned 

>1700-17FE Hex-bus (tm). 

>1800-18FE Thermal printer. 

>1900-19FE EPRCM prograiriner, something that TI planned but never came out 
vdth. 

>1A00-1AFE Unassigned 

>1B00-1BFE Unassigned 

>1C00-1CFE Video Controller Card. 

>1D00-1DFE IEEE. 448 Controller Card, apparently something else that TI didn't 

release. 

>1EX)0-1EFE Unassigned 

>1F00-1FFE P-Code"'card. 



VDP RAM 16K 



>0000-02FF SCREEN IMAGE TABLE {.ISK) 

This portion of VDP Ram contains the characters that you see on 
your screen. Bex 0000 is the character in the tcp-left comer of 
the screen. The ascH values have offset value of >60. 

>0300-036F SPRITE ATTRIBOTE TABLE (.IK) 

This table tolds the information for all 28 sprites. 

eg. position (dot rcw, dot column) ^ character nurriber, and its color. 

>0370-077F PATTERN DESCRIPTCR & SPRITE PATTERN TABLE (IK) 
Ccaitains the patterns for characters & sprites, 
eg. address for the ^ce is (768+8*32=1024). 

>0780-07FF SPRITE MOTION TABLE (.12K) 

T3iis holds row and colimm velocities for all 28 sprites and it used 
fay the Int eiiupL r o uti ne in console ROM. The routine executes 60 
times a second(or 60 Hert2)and since it is interrupt driven it will 
use the values i this table to rpdate the Sprite Attribute Table. 
Each sprite uses 4 bytes. One for row velocity, one for column 
velocity, and 2 for the system to use. 



A-20 



>0800-08lF COWR TABLE (.03K) 

This portion contains the foreground and backround color 
information for each character set. The definition for each color 
uses one byte, bytes 0-3 for foreground and 4-7 for backround. 
Hiere are 32 bytes in the table. (Sets 1-32). Sets 1-3 aren't used 
Set 4 (in table) is character set 0, set 5 is 1, etc. up to set 
18 (for table) 14 for character set. Sets 19-32 aren't used by the 
'COLOR' state:nent in Esctended BASIC. 

>0820-35D7 DYNAMIC MEMCKY SPACE (11. 5K) 

This holds your program and other things like PAB(PeriEiieral Access 
Block), strings, syn±)ol table, numeric value table, & the line 
number table (for finding the lines of your program thats in the 
crunched format) .Your BASIC program is loaded from >35D7(bottan) 
and up. Lines appear as they as typed in, not in the order of line 
numbers (like 100,110,120). 

>35D8-3FFF FILE BUFFERS (2.5K) 

CALL FILES (n) will change this starting address but with CALL FILES 
(3) it start repectively at >35D8. If the power up routine finds a 
disk controller then the coiiputer will automatically reserve this 
this space for drive control, file allocation, and data buffering. 



j Console CSOl 18K | 
-h + 

jSiere are 3 GRQM chips in our consoles. Each has 8K of space but only 6K is 
used. Ihe difference between ROM and GROM is that autanaticallt increrents 

itself everytiire it is accessed.GRCM is also written in OL (Graphics 
Programming Language) , which TI wrote themselves. Here are those 3 GROM chips: 

QRQM >0000-17FF Ihe title screen power up routine, title screen character 

set, standard character set(Dpper & Lower casd), cassetre DSR 
messages and the trigonometric functions. 

GRDM 1 >2000-37FF Vector tables for BASIC^ the error messages, and part of the 

BAISC interpreter. 

GROA 2 >4000-57FF Part of the BASIC interpreter, the reserved word list and 

their associated token yalues. 

GRCM chips 3-6 (24K)are in the Extended BAISC cartridge and contain the 
following: 

GROM 3 >6000-77FF X/BASIC vector tables, the error statements for X/BASIC and 

part of the X/BASIC interpreter. 

GROM 4 >8000-97FF Part of the X/BASIC interpreter. 

GRCti 5 >A000-B7FF Part of the X/BASIC interpreter. 

GR(M 6 x;000-D7FF Part of the X/BASIC interpreter, the reserved word list and 

thedLr associated token values. ^ 



video Display Processor RAM for Extended BASIC 
VDP / a ccxtplete look. 



-4- 



>0000 VDP SCREEN IMAGE TABLE 

each screen location takes xxp 1 byte, the character 
value at each location is offset by >60. 

IOCATION=COL^32* (ROW-l) 



768 bytes 



>0300 



SPRITE ATTRIBIJTE TABLE 



112 bvtes 



Eac±i sprite takes up 4 bytes, (roorri enough for only 28) 
These for bytes consist of vertical postion -1, horizonral 
position, character # + >60, clock bit, color. 



>036F 



>0370 



EXTENDED BASIC SYSTEM BLOCK 



>0371 Auto Boot (needed flag) 
>0372 Line to start execution at 

>0376 Saved symbol table "GLCBAL" pointer {used with 

subprograms ) . 
>0378 Dsed for CHRS 
>0379 Sound blocks 

>0382 Saved program pointer for continue and rext pointer 
for break 

>0384 Saved buffer level for continue 

>0386 Saved expansion menory for continue 

>0388 Saved value stack pointer for continue 

>038A OJ USSOR line pointer 

>038C Edit recall start address 

>038E Edit recall end address 

>0390 Dsed as tenporary storage place 

>0392 Saved main symbol table pointer 

>0394 Auto load tenp for inside error 

>0396 Saved last sioh^^rogram pointer for continue 

>0398 Saved ON WARNING/SREAK bits for continue 

>039A T&rp to save siiprogram table 

>039C Same as above but used in subprograms 

>039E Merged tenp for PAB (Perijiieral Access Block )pointer 

>03A0 Random number generator seed 2 

>03A5 Randcxn number generator seed 1 

>03AA Input terp for pointer to prarpt 

>03AC Accept temp pointer 

>03AE Try again (used when you input a string instead of a 
number) 



>03B0 Pointer to standard string in VALIDATE 
>03B2 Length of standard string in VALIDATE 
>03B6 Size teirp for record length. Also teirp in relocating 
program 

>03B7 Accept "TRY AGAIN" flag 

>03B8 Saved pointer in SIZE when "TRY AGAIN" 

>03BA Used as tenp storage place 

>03BC Old top of memory for relocating program / torp for 
INPUT 

>03BE New top of mannory for relocating program 
>03C0 Roll out area for scratch pad RAM when certain 

operations are performed 
>03DC Floating point sign 

>03EF 

>03F0 PATTERN DESCRIPTOR TABLE 912 bv^es 

/ SPRITE DESCRIPTOR TABLE 

Each character take up 8 bytes. There are 114 characT:ers 
here. Hiey are numbered from 30 to 143. 

>077F 

>0780 SPRITE MDTICXs" TABLE 128 byzes 

Each sprite takes up 4 bytes. 15iese 4 bytes contain the 
vertical velocity, horizontal velocity/ & the lasr 2 are 
for system use. 

>C7F? 

>0800 COLOR TABLE 32 bytes 

Each ciiaracter set requires only 1 byte. Ihis byte is 
broken up into the foregromd ^ backromd. 

>081F 

>0820 CRUIK3J BUFFER 160 bytes 

Unis area of VDP is used raen the system needs ro crunch 
ASCII values into tcSasn codes. 

>08BE 

>08C0 EDIT / RECALL BUFFER 152 bytes 

What you type in at the comnand line is stored here* 

>0957 

>0958 VALUE STACK 16 bytes 

Used by these ROM routines : SADD, SSUB^ SMHL, SDVJ, & SCCMP 

>0967 



A-23 



4 

>0968 



+ 

11888 bytes 



The items in this area move according to the size of the 
cirunched program & the system always reserves 48 bytes of 
area. 

The SYMBOL TABLES are generated during the pre-scan peroid 
after you type RUN. TSie strings are placed into memory when 
they are assigned. 

WITHOOT MEMCHY EXPANSION: 

-STRINGS 

-DYNANELC SYMBOL TABLE & PABS 

-STATIC SYMBOL TABLE 

-LINE NUMBER TABLE 

-PROGRAM SPACE (crundied program) 

WITH MEMORY EXPANSICSJ: 

-STRI1«3S 

-DYNAMIC SYMBOL TABLE & PABS 
-STATIC SYMBOL TABLE 
-Numeric values, line number table, 
& program space are moved into 
High-memory expansion{ >A000 ) 

>37D7 



>37D8 DISK BUFFER AREA [ defaull: 'CALL FILES(3)' ] 5 byces 

>37D8 Validation code for the disk controller DSR ( >AA ) 
>37D9 Points to TCP of VDP nemory ( >3FFF ) 
>37DB CRD base identification 

>37DC Maximum number of OPENed files ( >03 default ) 



File Control Block for 1st file OPENed 518 bytes 

>37DD Current Logical record offset 
>37DF Sector number location of File Descriptor Record 
>37E1 Logical Record Offset(used woth VARIABLE files only) 
>37E2 Drive nurruDer (using the high order bit) 
File Descriptor Record (brought from the disk 256 bytes) 
>37E3 File nane 
>37ED Reserved ( >0000 ) 

>37EF File status flags (file type & write protection) 

>37F0 Max nisnber of records per Allocation Unit(l AD=1 Sector) 

>37F1 number of sectors cu r r e ntly allocated (256 byte blocks) 

>37F3 End of File offset within the last used sector 

>37F4 Logical record length 

>37F5 # of FIXED lenght records OR # of sectors for VARIABLE 
length 

>37F7 Reserved OOOOO >0000 >0000 >0000) 

>37FF Pointer blocks 

>38E3 Data Buffer area (256 bytes) 



>39E3 File Control Block for 2nd file OPEJted (6 b) s 518 bytes 

>39E9 File Desriptor record (256 bytes) 
>3AE9 Data Buffer area (256 bytes) 



>3BE9 File Control Block for 3rd file OPENed (6 b) 518 bytes 

>3BEF File Descriptor record (256 bytes) 
>3CEF Data Buffer area (256 bytes) 



>3DEE 



>3DEF VDP STACK AREA 252 bytes 

>3EEA 



>3ESB DISK EHIVE INFO 4 bytes 

>3EEB Last drive number accessed 
>3EBC Last track access on drive #1 
>3EED Last track access on drive #2 
>3EEE Last track access on drive #3 

>3EEE 

' . — _ + 



>3ESF not used by the 4A , it might have been used 6 bytes 

by the 4 (?) 

>3EF4 



>3EF5 VOLUME INPQEMATIC*! BLOCK 256 bytes 

An exact copy of sector >0 from the disk last accessed. 

>3FF4 



>3FF5 FILE NAME COMPARE BUFFER 11 bytes 

Contains disk nuniber & 10 character file riarma from last 
access. 

>3FFF 



References: 

-Millers Graphics, "THE SMART PROGRAMMER" 
-"MICRCpedium" 

-Editor/Assenibler's KKb'EKENCE MANUAL 

-"TI-99/4A OCWSOLE & PERIPHERAL E5CPANSI0N SYSTm TECHNICAL DATA" 
-•9900 FAMILY SYSTEMS DESI(2J' 

-"IMS 9918A VIDEO DISPLAY PROCESSOR DATA MANUAL" 
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DISK DRIVE SPECIFICATIONS 

VERSION SEPTEHBER 12, 1985 

by Loui» Guion, Startext 77536 



! ! ! iSIDE! 1 55 V:i2V!ACCES 
! MANUFACTURER ', MODEL NUMBER J H I GH ! DENS ! TP I ! B TTES j PWR 1 PWR ! T I ME 


1 MOTOR 
1 DRIVE 


i 

icOhflENT 


!Alp«Electric}FDD2225 !l/2 ! II 11 
; Canon :MDD211 U/2 IDSDDl 48 I3&0K 1 J 
: C.D.C. 19409 ! Full JDSDD 148 i360K S 1 
IC.D.C. 19428 Jl/2 IDSDDI48 I3&CK 1 1 
SEpson SSD521 11/2 IDSDDI48 I360K I.4AS.4A 


j 

!6MSEC 


SDrect 
IDrect 


4 O.K. in PBox 


JHltachi IHFD505B .'1/2 ! II 1 
JMatsushita !JA551 !l/2 III i 
{Matsushita IJA55S1-2 11/2 III S 
IMicropolis 11115V IFullIDSQDI 1 1 
IMitsudishi IM4851 11/2 IDSDDI48 1360K I 










IMitsubishi IM4853 11/2 IDSaDl'96 I720K 1.5A 
.'"^J IFuniSSSDI48 1 90K 1 
!B32 IFulliDSDD! 1 I 
• MPI I501C-200 U/2 : ! I , I 
;«PI I502S-100 11/2 IDSDDl 1 1 


1.7A 




IBelt 


isold in PBcx 


INational 1JA551-2 11/2 iDSDD148 1360K i 
.Panasonic 1JA551-2 11/2 1DSDD:48 I360K J 
.Qu»etrack 1142 11/2 IDSDDl 48 13WK I 
uu»etrack .142LX 11/2 IDSDDl 48 13A0K { 
jQumetrack 1542 IFullI {48 1 ! 




|6MSEC 


!B«lt 


!Hi Pur Regal 


IRemex 1RFD480 12/3 IDSDDl 48 13WK I 
■ Sanyo 1FDA5200B/PC 11/2 IDSDDl 48 1360K 1 
-Sanyo 1SM548D 11/2 IDSDDl 48 I360K 1 
-Shugart 1400L IFull lSSSDi48 1 90K i 
-Shugart ISA4;5 11/2 1DSD0I48 I360K I.6A1 


.6A. 


6MSEC 
iMSEC 


IDrttct 
IBelt 


ISold in PBcx 
10. K. in PBox 


[Shugart lSA4i5 11/2 IDSCDi96 1720K 1 1 
Shugart 'S^-TS !l/2 ! .196 il.6H : i 
Siemens IFDDlOO-5 IFull ISSSDi48 1 90K 1 1 
j^anacn ITM50-1 11/2 ISSSDl I 1 1 
*anaon ITM55-2 11/2 IDSDD148 1360tC I 1 




6KSEC! 


Belt 


For thm ■Al- 
so Id in PBox 


.T^S22 iJCr^'l '"-/^ 1DSSD196 i720K 1 1 
Tandon 1TM«-2L 11/2 1 11 i ; 
Tandon ITKlOO-1 IFull ISSSD148 I180K 1 
.andon 1^100-2 IFull IDSDDl 48 I360K J I 
Tandon TMlOl-4 I IDSSDI 1 J I 






B«lt 

B«lt : 




rlSr '1/2 ISSSDl 118CK ! t J 
■5Sr ^SS,, '1/2 1DSDD148 1360K S.4AJ.3AI 
4^ P^5BV-06 Jl/2 1DSDD148 13^ 1 } J 

'1/2 lSSaDS96 1500K I { I 
itAC FD55r 11/2 10530196 1 IM 1 } 1 


^SEc: 

6MSECJ 
6nS£Cl 
3nSECI 
SnSeCJ 


Drectl 
Dr«ctJ 
Drect J 
Dr«ctJ 


O.K. in PBoxS 
No Hd Ld Sol: 


tIt^ ^SS^"*^ •1<2 JDSQDI96 11. 2H 5 1 
ftC 5FB503 11/2 I<3S9lV«!0ot 1 1 
Toshiba - S5401 i jfiSDDl " 
Toshiba :nD04D Jl/2 

Toshiba IND040T ll/2 IDSDDl 1 { } 


1 
J 

« 
1 

I 




t i[ -s-T 


rOT Zn9 AT ! 

i 


Y.E.Data JTD580 Jl/2 1 J 1 l • 
; J 1 1 1 1 1 

1 I 1 1 > : 
: i ] i 1 i 

' > J 1 1 > 


I I 
i J 

• 1 
I 1 

1 1 
> 1 




1 

1 
1 
1 
1 

1 

• 









driv.?fhJ ^•^O TI-99/4A users in identifying disk 

theiJ^ oJMin?%2f ""f**^"!* r**^ Peripheral &q3ansian Boxes and with 

viSdSr'^adJJPtiSiJinJi'^T?': ^l"'^* ^4 information had been garnered froe 
be used Si th clu??2^ A.. i*..^ 5? "•"•t; none-the-less 

8- usea wicn caution due to transcription and other typographical errors. 

so bv^^JltLt?nn*rKf*" ill """^ ."^fl to theinf ormation presented, please do 
contacting the author at Startext MC 77336. Tour help is appreciated! 



A-26 



TOKENIZED COMMAND STORAGE by S«orge f. St»+-f«n 

Som* o-f you may have heard that there is a method o-f using a single key to 
enter a statement »<hen programming. This is not an advertised -feature o4 the 
TI 99/4 (A) but results *rom the way TI Basic stores the program. Each 
statement in the prociram is stored as a single byte with a value over 127. The 
list of values and meanings is given below. HEX is the hexadecimal (base 16) 
value and DEC is the decimal value. Most of those values under 199 are 
available directly -from the keyboard by the use o-f the Control key along with 
another key. When in the immediate mode, you enter a number, the operating 
system assumes that you wish to enter a Basic line. 1-f the line number is 
-followed by a Basic statement, that statement is converted to its value and 
stored. If you enter a valid value, the conversion step i» not necessary and 
the value is stored directly. However, if you then LIST the line, the meaning 
of the statement will be printed. Por example. Control and Z equals REM| 
Control and U equals RANDOIXZE and Control and j equals PRINT. You can 
experiment to find other keys which will equate td statements. 



HEX DEC MEANING 



80 126 

81 129 

82 130 

83 131 

84 132 

85 133 

86 134 

87 135 

88 156 

89 137 
8A 138 
8B 13«» 
SC 140 
8D 141 
8E 142 
8F 143 

90 144 

91 145 

92 146 

93 147 

94 148 

95 149 

96 ISO 

97 151 

98 1S2 

99 153 
9A 154 
9B 155 
9C 156 
9D 157 
9E 158 
9F 159 



Note 1 
Ei.SE 
I t 



IF 

GO 

GOTO 

GOSUB 

RETURN 

D6:f 

DIM 

END 

FOf^ 

LET 

BREAK 

UNBREAK 

TRACE 

UNTRACE 

INPUT 

DATA 

RESTORE 

RANDOMIZE 

NEXT 

READ 

STOP 

DELETE 

REM 

ON 

PRINT 
CALL 
OPTICW 
OPEN 



TOKENIZED COMMAND STORAGE 
HEX DEC l«ANIN6 



AO 160 

Al 161 

A2 162 

A3 165 

A4 164 

A5 165 

A6 166 

A7 167 

AG 166 

A9 169 

AA 170 

AB 171 

AC 172 

AD 173 

AE 174 

AF 175 

BO 176 

Bl 177 

B2 178 

B3 179 

B4 180 

B5 lei 

B6 162 

B7 183 

B8 184 

B9 les 

BA 166 

BB 167 

BC 188 

BO 169 

BE 190 

BP 191 



CLOSE 
SUB 

DISPLAY 

IMAGE « 

ACCEPT « 

ERROR » 

WARNING* 

SUBEXITt 

SUBEND « 

RUN t 

L INPUT « 

Note 1 

Note 1 

Note 1 

Note 1 

Note 1 

THEN 

TO 

STEP 

f 

I 

I 

) 

( 

«> 

Note 1 
OR * 
AND t 
XOR • 
NOT t 



HEX DEC MEANING 


HEX DEC MEANING 




'1 






EO 


224 


MIN * 




1 QT 






El 


225 


RPT« t 










E2 


226 


Note 1 




1 QS 

1 ^ w 


* 




E3 


227 


Note 1 




19^ 


/ 




E4 


228 


Note 1 


WW 


197 






E5 


229 


Note 1 


C6 


198 


Note 


1 


E6 


230 


Note 1 


C7 


199 


Note 


2 


t7 


231 


Note 1 


C8 


200 


Note 


3 


E8 


232 


NUMERIC* 


C9 


201 


Note 


4 


E9 


233 


DIGIT « 


CA 


202 


EOF 




EA 


254 


UALPHA * 


CB 


203 


ABS 




EB 


235 


SIZE * 


CC 


204 


ATN 




EC 


256 


ALL * 


CD 


205 


COS 




ED 


237 


USING t 


CE 


206 


EXP 




EE 


256 


BEEP * 


CF 


207 


INT 




EF 


259 


ERASE * 


DO 


208 


LOG 




FO 


240 


AT * 


Dl 


209 


88N 




Fl 


241 


BASE 


02 


210 


SIN 




F2 


242 


Note 1 


D3 


211 


SGR 




F3 


243 


VARIABLE 


D4 


212 


TAN 




F4 


244 


RELATIVE 


D5 


215 


LEN 




F5 


245 


INTERNAL 


06 


214 


CMR% 




F6 


246 


SEQUENTIAL 


D7 


215 


RNO 




F7 


247 


OUTPUT 


06 


216 


8EG« 




FB 


246 


UPDATE 


D9 


217 


POS 




F9 


249 


APPEND 


OA 


216 


VAL 




FA 


250 


FIXED 


DB 


219 


STR» 




FB 


251 


PERMANENT 


DC 


220 


ASC 




PC 


252 


TAB 


OD 


221 


PI 




FD 


253 


• (Files) 


DE 


222 


REC 




FE 


"254 


VALIDATE* 


OF 


223 


MAX 


« 


FF 


255 


Note 1 



Note 1. 
Note 2. 
Note 3, 



Not© 4. 



riMning unknown « not us«d in Basic or Extended Basic. 
Unquoted string. 
Quoted string. 

Both the above are -followed by one byte giving the string length and 
then by the string. There is no closing quotation mark or end marker. 
Foil ogling two bytes are line number — second plus 256 times the -first. 
Recognised by Extended Basic only. 
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ERROR CODE LISTING 



EXTENDED BASIC ERROR CODES 

10 Numeric overflow 

14 Syntax Error 

16 Illegal after Sbrtn 

19 Name too long 

20 Unrecognized Char 
24 $/# Hismatch 

28 Improperly used name 
36 Image error 

39 Memory Full 

40 Stack Overflow 

43 Next without For 

44 FORHMEXT Nesting 

47 .Must be in Sbrtn 

48 Recursive Sbrtn CALL 

49 Missing SUBEND 

51 RETURN without GOSUB 
54 String Truncated 

56 Speech $ too long 

57 Bad Subscript 

60 Line not found 

61 Bad Line » 

62 Line too long 
67 Can't CONtinue 

69 Command Illegal in Prgrm 

70 Only legal in prgrm 
74 Bad Argument 

78 No Program Present 

79 Bad Value 

80 Nil 

81 Incorrect Argument List 

82 Nil 

83 Input Error 

84 Data Error 

97 Protection Violation 
109 File Error 

130 I/O Error 

125 Sbrtn not found 



EDITOR/ASSEMBLER ERROR CODES 
XB ERROR EQUATES 



ERRNO >0200 
ERRSYN >0300 
ERRIBS >0400 
ERRNQS >0500 
ERRNTL >0600 
ERRSNM >0700 
ERROBE >0800 
ERRMUV >0900 
ERRIM >0A00 
ERRMEM >0B00 
ERRSO >0C00 
ERRNWF >0D00 
ERRFNN >0E00 
ERRSNS X>FOO 
ERRRSC >iOOO 
ERRMS >1100 
ERRRU6 >1200 
ERRST >1300 
ERRRBS >1400 
ERRSSL >1500 
ERRLNF >1600 
ERRBLN >1700 
ERRLTL >1800 
ERRCC >1900 
ERRCIP >1A00 
ERROLP >1B00 
ERRBA >1C00 
ERRNPP >1D00 
ERRBV >1E00 
ERRIAL >1F00 
ERRINP >2000 
ERRDAT >2100 
ERRFE >2200 
ERR 10 >2400 
EPJ^SNF >2500 
ERRPV >2700 
ERRINV >2800 
WRNNQ >2900 
WRNST >2A00 
WRNNPP >2B00 
URNINP >2C00 
WRNIO >2D00 



2 
3 
4 
5 
6 
7 
8 
9 
10 
11 
12 
13 
14 
15 
16 
17 
18 
19 
20 
21 
22 
23 
24 
25 
26 
27 
28 
29 
30 
31 
32 
33 
34 
36 
37 
39 
40 
41 
42 
43 
44 
45 



Numeric Overflow 
Syntax Error 
111. after Sbprgm 
Unmatched Ckiotes 
Name too long 
$/# Mismatch 
Option Base Error 
Improperly used name 
Image Error 
Memory Full 
Stack Overflow 
Next without. For 
FOR-fEXT Nesting 
Must be in Sbprgrm 
Recursive Sbprgrm 
Missing SUBEND 
RETURN without 60SUB 
String Truncated 
Bad Subscript 
Speech $ too long 
Line not found 
Bad Line Number 
Line too long 
Can't Continue 
Illegal in Program 
Only legal in Program 
Bad Argument 
No Program Present 
Bad Value 

Incorrect Argument List 
Input Error 
Data Error 
File Error 
I/O Error 

Subprogram not found 
Protection Violation 
Unrecognized character 
Numeric Overflow 
String Truncated 
No Program Present 
Input Error 
I/O Error 



EXECUTION ERRORS 

0-7 Standard I/O 

08 Memory Full 

09 Incorrect Statement 
OA Illegal Tag 

OB Checksum Error 

OC Dup. Definition 

OD Unresolved Ref. 

OE Incorr<Kt Statement 

OF Program not found 

10 Incorrect Statement 

11 Bad Name 

12 Can't Continue 

13 Bad Value 

14 Number too big 

15 String/Number 

16 Bad Argument 

17 Bad SuBscript 

18 Name Conflict 

19 Can't do that 
lA Bad Line Number 
IB FOR NEXT Error 
IC I/O Error 

ID File Error 

IE Input Error 

IF Data Error 

20 Line too long 

21 Memory Full 

22 Unknown Error Code 

LOADER ERROR CODES 

0-7 Standard I/O 

8 Memory Overflow 

9 Not Used 

10 Illegal Tag 

11 Checksum Error 

12 Unresolved Ref. 



TI BASIC ERROR CODES PERTAINING TO DISK SYSTEM TI WRITER ERROR CODES 



FIRST » 

OPEN 

CLOSE 

INPUT 

PRINT 

RESTORE 

OLD 

SAVE 

DELETE 

EOF 



SECOND # 

Can't find specified Disk Drive 
gis*< or program is Write Protected 
Bad Open Attribute 
Illegal Operation 

Disk full or too many files opened 
Attempt to read past EOF 
Device Error 
File Error 



- 



Indicates Disk Controller not on; 
OR: Diskette not Initialized 
No Disk in Drive; OR: Is upside down; 
OR: Drive is not turned on 
No Disk in Drive 

Illegal use of LoadF, PrintF: OR: 
No file m Diskette with Filename used 
Disk is full 

06 - PrintF Command in progress was 

interrupted; ORz Disk Door was opened 
while Red Light was on 

07 - Invalid Filename (I.E. Name too long 

or using invalid characters) 
15 - Invalid Disk Drive Number, or Device 



6 - 

7 - 
00 - 
02 - 
04 



DISK MANAGER ERROR CODES 



FIRST » 
OTHER 
SEEK/STEP 
INPUT 
PRINT 
NIL 
NIL 
NIL 
NIL 

Special Error Code for 
Comprehensive Test 



SECOND » 
Rec not found 
Cyclic Redundancy 
Lost Data 
Write protect 
Write fault 
No Disk Drive 
Invalid input 



I/O ERRORS 

« FIRST « 

1: OPEN 

2: CLOSE 

3: PRINT 

4: RESTORE 

5: OLD 

6: SAVE 

7: DELETE 



SECOND i 

Device not found 

Write Protected 

Invalid I/O Command 

Out of space 

EOF 

Device Error 
File/Data Mismatch 
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SECTOR >2 TO >21 - File Descriptor Recorcs 



ADDRESS 



CWTENTS 



Disr riff 

by Eirl Hall 



The foUoidng is i cmpleti iBd, to the best of ey 
knoiledge, accurate description of the Disk Directory 
fonat and file storage allocation used by the TI-?9/4(A) 
Earl Hall CoipoServe ID - 7274^,3244 



SECTOR - Voloie Isforaatios Block 
ESS CONTEXTS 

OOOChOOO? Disk naie - uo to 10 characters 
OOOA-OOOB Total moner actors m disk 

(>01Ms360, >C2DO«720, >0SMsl440) 
OOOC >0? (f of sectors/trkJ 

MOD-OOOF 'DST 044534B) 

0010 )S0 ^ Disk backup protected, >20 = not 
protected 

0011 I Df tracks per side OSMO, >2>35) 
0012-0013 t of sides/dessity (>0101=SS/S2, 

)O201:=8S/SD, >0202^/0D) 
0035*end Sector allocation bit mu See note beioe 

KOTE on >003E-tnd: This is a sector-by-sectx bit 
sac of sector use; l^sector i«d, Os«ctor available* 
The first bvte is tor sectors through 7, the second for 
sectors 5 throucn IS, and so on. iithio each byte, the 
bits correspond to the sectors fna right to left. For 
exaiQlE, byte >D0^ contained >CFO0 then the first 
byte eooals 1100 1111. This eeans that SKtors tto^ough 
3 are used, sectors 4 and S unosed and »ctors & and 7 
osed. Inftraatita for the 2nd side of a 9S/SD disk 
starts at byte >0a65 and ends at byte >0091. 



SECTOR 1 • Directiry Link 

Each IHiit eord lists the actor noiher of the File 
DescrlBtcr Record for an allocated file, in alphabetical 
order of the file nates. The list is tereinated by a 
Hord containing >0000; the^ore, the iaziaui nuiher of 
Hies per disk is 127 [(25^21-1]. If Ihe aiohabetical 
order is comiotBd (by a systei crash daring naie change, 
for instance), the binary search tethod used to locate 
files Hill be effected and files say becoie unavailable. 



OOOD 

OOOE-OOOF 



0010 



0000-0009 File naee - up to 10 characters 
OOOC File type: >01aPrograi(ieiorriiage] 

>00sDIS/Fn >02=IKT/FIX 
>«)«DIS/VAR >B2«INT/VAR 
File deletion protection invoked by Disk 
iUoager 2 uill be shewn by >08 added to the 
above. 

t of (HAXBECSIZE) records/sector 
Nu^er of sectors allocated to the file. 
(Disk Nanager 2 eill list me tore than 
this noiher, thereby including this sector 
in the sector cmint) 
For aeiory-ieage prograi files and 
variable-length data files, this contains 
the ouiber of bytes used ic the last disk 
sector. This is used to deteriine 
end-of-file. 
0011 flAXRECSIZE of data file. 

0012-0013 File record count, but vith the second byte 

being the bigh-orde' byte of the value. 
OOlC - end Blxk Link (see note) 

hote on file storage: Files are placed on the disk 
in first-coie / first-served lanner. The first file 
enttra eill start' at sector >0022, and each subsequent 
file will be placed after it. If the first file is 



deleted, a never 
occupied. 



fil8 «ill be irittsi in the soacs it 



If this space isn't big enough, the file nill be 
'fractured', and the reeainde* «i!l be placed in the next 
available block of sectors. The block link lac keess 
ti'ack of this fracturing. Each block link is 3 bytes 
lone. The value of the 2nd digit of the second srte 
folloaei by the 2 digits of the first byte is the acdress 
of the first sectx of this eztait. The value of the 3rd 
byte folloiM by the 1st digit of the 2nd byte is the 
nuiber of additional sectors eithin this ertent. 

SKtirs 2 thnagh >21 are reserved for File 
Descriptor Records and are allocated for file data ooly 
if no other available sectors exist. If aore than 32 
files are stored on a disk, additional File than ;:2 files 
are stored on a disk, additional File Descristor Records 
«ill be allocated as nesied, tae sector at a tioe, free 
the general available sector pool. 

(reprinted f roe the newsletter of the Ceitral itetchester 
99'6rs.) 
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FORMAT FOR DISK DIRECTORY /ALLOCATION OF FILE STORAGE 
From: "The paper Peripheral" Central Texas 99/4A Users Group 

The following is a complete ar^d, to the best of my knowledge, 
accurate description of the disk directory format and file storage 
allocation used by the 99/4A computer. 



SECTOR CONTAINS THE VOLUME INFORMATION BLOCK 



Address 

0000-0009 

0004-000B 

000C 

000D-000F 

0010 

0011 

0012-0013 
0038-end 



Contents 

Disk name — up to 10 characters 

Total number of sectors on disk 00168=360, >0200=-y20, 
>05AD=1440 

>09 <# of sectors/trk) 
'DSK' 044534B) 

>50=Disk backup protected, >20=not protected 

# of tracks per side <>2B=40, >23=35) 

# of sides/density <>0101=SS/SD, >0201=DS/DD, >0202=DS/DD) 
Sector allocation bit mao. See note below. 



Note on >0038-end: This is a sector — by-sector bit map of sector 
usej l=sector used, 0=sector available. The first byte is for sectors 
through 7, the second for sectors 8 through 15, and so on. Within 
each bytej, the bits correspond to the sectors from right to left. For 
examp.!!<?, if" byte >0038 contained >CF00 then the first byte equals 1100 
This means that sectors through 3 are used, at byte >0091. 



SECTOR 1 CONTAINS THE DIRECTOR LINK 

Each 16-bit word lists the sector number of the File Describtor 
Record for an alocated file, in alphabetical order of the file names. 
The list is terminated by a work containing >0000; therefore, the 
maximum number of files per disk is 127 C(125/2)-lD. If the 
alphebetical order is corrupted (by a system crash during name change, 
for instance), the binary search method used to locate files will be 
effected and files may become unavailable. 
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DISK ALLOCATION (CONT.) 
SECTORS 2 TO Zl CONTAIN THE FILE DESCRIPTOR RECORDS 



Address 

0000*04309 

000C 



000D 

000E-000F 



0010 



0011 

0012-0013 
001C-end 



Contents 

File name— —up to 10 characters 

Filetype: >00=DIS/FIX, >01=Program (memory-image) , 

>02=INT/FIX, 

>80=D I S/ V AR , >82= I NT/ V AR 

File deletion protection invoked by Disk Manager 2 will be 
shown by >E^ added to the above. 

# o-F <MAXRECSIZE> record/sector. 

# o+ sectors allocated to this -file. (Disk Manager 2 will 
list one more than this number, thereby including this 
sector in the sector count.) 

For memory— image program "files and variable— length data 
-files, this contains the number o-f bytes used in the last 
disk sector. This is used to determine end-o-f — f ilo. 
MAXRECZIZE o^ data -2=ile. 

-file record count, but with the second byte being the 
high-order byte o-f the value. 
Block Link. See note below. 



Note on -file storage: Files are placed on the disk in 
-f irst-come/-First-served manner,. The -first -File written will start at 
sector 0022, and each subsequent file will be placed a-fter it. I-f the 
-first -file is deleted, a newer -file will be written in the space it 
occupid. I-f this space isn't big enough, the file will De '-fractured', 
and the remainder will be placed in the next available block of 
sectors. The block link map keeps track of this fracturing. Each 
block link is 3 bytes long. The value of the 2nd digit of the second 
byte follcmed by the 2 digits of the first byte is the address of the 
first sector of the extent. The value of the 3rd byte followed by the 
first digit of the 2nd byte is the number of additional sectors within 
this extent. Sectors 2 through 21 are reserved for File Descriptor 
Records and are allocated for file data only if no other available 
sectors exist. If more than 32 files are stored on a disk, additional 
File Descriptor Records will be allocated as needed, one sector at a 
time from the general available sector pool. 
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A 32,33 reserved 



Fixinff Blown Disks 



TERRY ATKINSON 



H you have had a disk drive for any length of tiee, 
chances are you have encountered such devastating aessages 
as *disk not initialized' (when you know full well it is!), 
or 'prograi not found " (when you know it is supposed to be 
there!}. Or, perhaps, you have accidentally deleted a 
prograi and want to get it back. All of the above can be 
reaedied. 

FiriNE THE DISK BIT HAP (AUO) 

AUG, or Sector contains the disk bit aap, and if the 
characters '9SK' are altered, you will be unable to catalog 
or copy tne disk. Indeed, a 'DISK NOT INITIALIZED' error 
will snow uc. You can, however, retrieve prograas and files 
individually and transfer thei tc another disk. That is, if 
you KNEV the naies of ALL the prograas/files on that disk. 
Thtri is a better way which iliainates the possibility tnat 
you 'forget' about a particular prograa. 

Boot up your disk fixer and load sector froi a disk. 
ANY disk will do. Then write the good sector tc the bad 
disk. This restores AUO on the bad disk, but the bit aap is 
NOT correct, but tnis does not aatter. All you want to do 
is to be able tc catalog and copy the disk using DK2. Use 
DK2 (not FORTH) to copy the entire disk to a new disk. You 
can then initialize the bad disk. That is all there is to 
it. 

Ruined bit aaps aay not be discovered until it is too 
late. Any new prograas saved to a disk with a ruined bit 
aap aay write over older prograas or data. Boodby older 
prograa. There's nothing you can dc about it. 

Another possibility is that sector C has been Oaaages, 
perhaos by aagnetisa or a scratch on the surface. In this 
case, you'll find out when vou try to read/write sector 0, 
You won't be able to. Now you have a problea, but not 
insuraountable. The only 'fix' for this is tc copy all 
sectors froa the bad disk to a good diik, aector-by-eector, 
A tedious chore tc be sure, but at least you can get all 
your prograas back. It will still be necessary to proceed 
as above tc get your progrus back, as the bit aap on the 
new disk will not be correct. Now, I u not sure how FORTH 
would behave under this circuastance. I know FORTH will 
"choke* when it tries to copy a daaaged aector, but whether 
or not it will continue to copy the 'good* aectors and put 
then into their proper places on the new disk, is beyond ae. 
I wouldn't chance it. Better to be safe than sorry and 
stick to tried and proyen aethods. Of course, you could 
experiaent. If it works, let us all know. If loie of you 
FORTH addicts out there could shed aoae light on the 
subject, your coaaents would be aost welcoae. 

FIXIN6 THE DIRECTORY LINK HAPMAUl) 

SI keeps track (alphabetically) of all the 
prograas/files on the disk. Bad si's could produce errors 
such that atteapts to catalog the disk will produce a 
heading, but no orograas, or aaybe just •soee' prograas will 



be listed. To fix this, though, is extreaely siaple. 
Here's how: 

First, look at AUO. Read the bit aap to deteraine 
which sectors between 2 and 33 inclusive ()2*/21) are 
flagged as used. Hake a list of these sectors in a coluin. 
Now, load each of these sectors in turn, and exaame the 
first 10 bytes of each. Copy the bytes down beside the 
relevant used sector. Deteraine the alphabetical order of 
these prograas aerely by readiing the nuaerical values. The 
lower the nuaber, the closer to the front of the alphabet it 
is. Now, produce a list of these sectors arranged 
alphabetically. Here's a short exaaplei 

Sector used Hex Values in 1st 10 bytes ) Prograa Naae 

2 4B 20 20 20 20 20 20 20 20 20 K 

3 4? 20 20 20 20 20 20 20 20 20 I 

5 4C 20 20 20 20 20 20 20 20 20 L 

6 41 20 20 20 20 20 20 2C 20 20 A 
A 41 20 20 20 20 20 20 20 20 20 AB 

Re-arranging the above alphabetically by sector would 
produce: 6,A,3,2,S which are going tc fora the directory 
link aap in NORD. 

Next, copy sector 1 froa ANY freshly initialized disk 
and write it to the bad disk. This is the easiHt way to 
'restore' SI to all zero's. Now, use the (A)lter couanc, 
and change the first, and each successive word tc produce 
the alphabetical pointers. For exmple: 0006 OOOA 0003 0002 
OOOS 0000. Note the 0000 at the end. The directory link 
aap aust be terainated with the value, Now, write this 
sector to the bad disk, and you're in business. 

RETRIEVIN6 AN ACCIDENTALLY 'DELETED' PRO&RAN 

tthen you have a prograa in aain aeaory, and type 'new', 
the prograa is not erased. Only the pointers are changed, 
but the progru is still in aeiory. A knowledgeable 
prograuer could actually 'unnew" a progru, although not 
without difficulty. 

The saae applies if you 'delete' a prograa froa tne 
disk. Only pointers are changed, and the progru is still 
on the disk provided you have not porforaed a 'save' since 
the deletion. Unlike aaln aeaory, retrieval of a deleted 
prograa froa disk is extreaely easy. 

Locate the sector containing the deleted file's 
directory (between (>2->21). You can do this by using the 
'FIK) STRIIK' coaaand, or, if your disk fixer does not have 
this coaaand, aerely load thea in one at a tiae and look for 
your 'deleted' progru' s naae in the first 10 bytes. Change 
the progru nue to 'inHIZZZI" (HEX code, of course). 
Now, write that sector back to it's proper spot. Load-in 
aector 1 and locate the first word containing 0000 and 
replace it with the directory sector I of your deleted 
prograa. Ensure the next word is 0000. Now, exit the DF 
and load the subject progru as per noraal. Exit the 
disk-fixer and load the prograa as noraal and save it BACK 
to the saae disk under the saae progru nue (ZZZZZZZZZZZ). 
Nhy? Because this will autoaatically update the disk bit aap 
(AUO). Now use DR2 to change the progru naae back to it's 
original naae and the task is coaplete. 
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A BRIEF ANNOTATED BIBLIOGRAPHY OF BOOKS RELATING TO TEE TI-99/4A 
•(from the personal library of Barry A. Traver) 

Assembly Language for the TI-99/4A 

. *Lottrup/ Peter M.L, Beginner's Guide to Assembly Language on the 
TI-99/4A. Cotpute! Books ^ 1985 • Although oriented toward Mini-Memory, this 
book is excellent for beginners, with very clear e:^lanations and lots of short 
but useful program exanples. 

*McComic, Ira. Learning TI 99/4A Home Coirputer Assenbly Language 
Progranining. Prentice-Hall , 1984, A good book for beginners who 
have the Editor/Assembler but no previous experience in assembly language. 

*Molesworth, Ralf^i. Introduction to Assembly Language for the TI Home 
Computer. Steve Davis Publishing, 1983. Primarily for use with the 
Editor/Assembler, but also can be used with Mini-Memory. Moves faster and 
further than the McCcxnic book. 

*^rley, M.S. Fundamentals of TI-99/4A Asserioly Language. TAB Books, 
1984. A good book for those who have the Mini-Memory Cartridge but not the 
Editor/As seiibler . 

BASIC Programs and PrograTming for the TI-99/4A 

Ahl, David H. ISie Texas Instruments Home Ccxrputer Idea Book. Creative 
Ccxrputing Press, 1983. "Includes 50 Ready-to-Run Educational Programs," but 
most of them seem to be written in minimRl BASIC and make no use of the 
special features of the TI-99/4A. 

*Carlson, Edward E. Kids and the TI 99/4A. mTAMDST, 1982. This book 
is truly "not just for kids," but one of the *best* introductions to learning 
how to program in TI BASIC. 

Casciato, Carol Ann, and Don Horsfall. TI-99/4A: 24 BASIC Programs. 
Howard W. Sans, 1983. Available with optional program cassette. Games, 
finances, hate management, oersonal records, and utilities are included, all 
in TI BASIC. 

*CaiE>ute! 's TI Collection: Volume One. A worthv*iile collection of "over 
30 TI-99/4A games, applications, utilities, and tutorials — most never before 
published," inclxading a word processor, a data base management system, an 
electronic spreadsheet/ several games, telpfiJ. programcning tricks, and a super 
graphics program called "SijperFont^ " 

Creative Programming for Young Minds... on the TI-99/4A. Creative 
Programming, 1982-1983. Several volumes in series. Hands-on instruction in 
TI BASIC (plus some small later reference to TI Extended BASIC) . This 
series — ^like Carlson *s book — is "not just for kids." 

*Davis, Steve, ed. Prograins for the TI Home Conpiiter. Steve Davis 
Publishing, 1983. Four dozen programs that *do* make use of the special 
features of the TI-99/4A. Most of the programs only require TI BASIC and 
cassette system, though sane make use of TI Extended BASIC, disk system, 
manory expansion, or Terminal Enulator 2 and speech synthesizer. 
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D'lgnazio, Fred- TI in Wonderland. Hayden Book Conpany, 1984. "21 
programs for learning aiKi fun," intended for youngsters , by the popular author 
of Katie and the Ccxtputer. 

D'Ignazio, Fred. The TI Playground. Hayden Book Carpany, 1984. "23 
programs for learning and fun," intended for young children. 

Dosthimerr Dave and Ted Buchholz. 'Hie Tool Kit Series: TI-99/4A 
Edition. Howard W. Sams, 1984. Brief 5- to 15-line subroutines—dealing with 
cx)lorr sound and musiCr gra{*iics, animation/ and carputation — that can be 
oorrtoined to form the basis of educational programs and cottputer games. 

Bigelr C.W. Stiimlating Simulations for the TI-99/4A. Hayden Book 
Conpany, 1984. 11 "siirulation gane programs" in TI BASIC, 2 in TI Esctended 
BASIC/ adapted from a popular book first published in 1977. 

*Flynn/ Brian. 33 Programs for the TI-99/4A. Cotputel Books, 1984. 
Although this book contains a few games , including a version of "Choap" called 
•Vanilla Cookie," it is primarily concerned with mathematically-oriented 
programs, including money management and business programs/ curve-fitting 
routines, matrix manipulations, statistics, and numerical analysis, all in 
Esctended BASIC. 

*Flynn, Christopber. Extended BASIC Home toplications on the TI-99/4A. 
Compute! Books, 1984. An excellent book containing data file manageiient 
utilities, bar graph programs, an electronic card file, an appointment 
calendar, and two electronic spreadsheets. Flynn's programs always allow data 
to be saved on either tape or disk. 

*arfJJ.o, John P., and others. Data ai^ File Managenent for the TI-99/4A. 
Wn. C. Brown Publishers, 1984. "Includes 48 programs to give the more 
advanced user techniques for information managemair.. " All programs are in TI 
Extended BASIC, and many make use of disk. Topics included: pointers, 
sorting, strings, linear and linked lists, sequential access files, direct 
access files, trees, and inverted files. 

Grille, John P*, and others. Introduction to Grajfcics for the TI-99/4A. 
Wn. C. Brown, 1984. Includes 38 programs in TI Extended BASIC, sotre majdLng 
use of disk, BOT note this oommsnt by the authors: "In this book, ^ have 
limited our discussicxi to lew-resolution graphics only. We do not discuss the 
color, sound, jqysticdc, and lightpen features of this fine machine. We hope 
to cover these topics in a subsequent book." 

Herold, Raymond J. TI-99/4A Sound and Graphics. A fairly good guide to 
sound, grajMcs, and speech synthesis on the TI-99/4A (including coverage of 
TI's text-to-speech diskette). Of the games, "Alphabet Invasion" and "Slot 
Machine" are done quite wsU. 

Holtz, Frederick. Using & ProgramDoing the TI-99/4A Including 
Ready-to-Run Programs. TAB Books, 1983. Although this book is widely 
distributed, many chapters are either too elementary or too advanced to be of 
benefit to the average TI-99/4A owner. 
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Inmanr Don, and others. Introduction to TI BASIC- Hayden Book Ccxrpany, 
1980. A straight-forward textbook on TI BASIC which does not go very far 
beyond the two manuals s\:5plied with the TI-99/4A. 

Knight, Tiinothy Qrr. TI-99/4A Graphics and Sounds. Howard W. Sams, 
1984. Available with optional program cassette. 37 sanple (and simple) TI 
BASIC programs, originally written for the Comnnodore 64, most of which are 
rather trivial in nature. 

Knight, Timothy Orr, and Darren LaBatt. TI-99/4A BASIC Programs. 
Howard W. Sams, 1984. Available with optional program cassette. Although 
these 30 TI BASIC programs were also originally written for the Ccxrinodore 64, 
they are more substantial than those contained in the other book by Knight. 

Kreutner, Donald C. TI-99/4A Favorite Programs Explained. Que 
Corporation, 1983. 40 practical and entertaining programs in TI BASIC, with 
explanations. 

*Loreto, Raro A. , ed. The TI-99/4A in Bits and Bytes. Reno A. Loreto, 

1983. A hodge-<x>dge collection, but one containing within it a number of 
worthvAdle programs (seme in Extended BASIC) and progranming hints. 

Peckham, Herbert D. Programming BASIC with the TI Home Cocputer. 
McGraw-Hill Book Cotpany, 1979. Another straight-forward textbook on TI 
BASIC, going a bit further than Inman's book. 

Reqena, C. BASIC Programs for Small Conpoters. Coupcte! Publications, 

1984. Although this book contains "things to do in 4K or less" for other 
conpiters (notably the Vic-20 and TRS-80), it also contains programs in TI 
BASIC for the TI-99/4A. 

Regena, C. Programrer's Reference Guide to the TI-99/4A. Compute! 
Pablications, 1983. Not so much a reference guide as an instruction man\:ial on 
how to program in TI BASIC, this book contains 48 programs by popolar 
colimnist Cheryl Whitelaw (or "Regena" of 99 'er and Compute! fame). 

Rugg, Tom, and others. 32 BASIC Programs for the TI-99/4A. dilithium 
Press, 1984* Programs include applications, education, games, graphics 
display^ and natheratics. 30 programs in TI BASIC, 2 in TI Extended BASIC. 
(The programs can be ordered on disk or cassette.) 

Sanders, William B. The Elementary TI-99/4A. DAIAMDST, 1983. Contains 
useful dt)apters on "Data and Text Files" and "You and Your Printer," topics 
usually ignored in similar books. 

Sciiechter, Gil M. TI-99/4A: 51 Fun and Educational Programs. Howard 
W. Sams, 1983. Available with optional program cassette. All programs are in 
TI BASIC/ ai^ all are probably 4K or less in size. 

Schreiber, Linda M. and Allen R. The Last Word on the TI-99/4A. TAB 
Books, 1984. "55 practical and entertaining programs, all written in TI 
Extended BASIC," perhaps the best of which are "Battleship" and "Towers Gams." 
(Programs are available on tape.) 



♦Sternberg, Charles D. TI BASIC Ccxtputer Programs for the Home. Hayden 
Book Company, 1984. Programs include automobile, conversion, home finances, 
kitchen helpmates, list, tutorial, and others, and each program is documented 
with description, symbol table, and output sample. The book is an adaptation 
for the TI-99/4A of Sternberg's BASIC Cotputer Programs for the Home; now if 
only someone will do an adaptation of his excellent two volumes on BASIC 
Conputer Programs for Business! 

Turner, Len. 101 Prograrandng Tips & Tricks for the Texas Instruments 
TI-99/4A Home Cortputer. ARCsoft Publications, 1983. An uniirpressive book 
carried in many bookstores. 

Turner, Len. 36 Texas Instruments TI-99/4A Programs for Home, School & 
Office. ARCsoft, 1983. Many other books on this list contain a much better 
selection of programs in TI BASIC. 

*Winter, Mary Jean. Coctputer Playground on the TI 99/4A. A colorful 
collection of TI BASIC computer activities intended for children in grades 2 
throu^ 6. Adapted for the TI-99/4A by Marcia Carrozzo. 

*Wyatt, Allen. BASIC Tricks for the TI-99/4A. Howard W. Sams, 1984. 
Available vdth optional program cassette. A good collection of 28 useful 
subroutines dealing with selective input, rounding, dollars and cents, report 
formatting, time and dates, upper and lower cases, sorting, and menus. 

*Zaks, Rodnay. Your First TI 99/4A Program. Like anything done ^oy Zaks, 
this book is clearly written and v^ll done. It is, however, ask the title 
indicates, a book for those v*io are just beginning to leam "the basics of 
BASIC." 

Games in TI BASIC or TI Expended BASIC 

Holtz, Frederick. TI-99/4A Gaire Programs. TAB Books, 1983. 32 "games, 
puzzles, and brain teasers" in TI BASIC, with explanations. 

*Ingalls, Robert P. TI Games for Kids. Conpute! Publications, 1984. An 
excellent collection of 32 educational game programs in TI BASIC for children 
ages 2 to 17. 

McEvqyy Seth. Creating Arcade Games on the TI-99/4A. Ccncxite! 
Publications, 1984* With the exception of one chapter devoted to TI Extended 
BASIC, this book tells "how to" write arcade games in TI BASIC, ard includes 
eight finished games. 

*Mullish, Henry, and Don Kruger. Zappers: Having Fun Programnning and 
Playing 23 Games for the TI-99/4A. Simon & Schuster, 1984. Many favorites in 
TI BASIC, including "Blackjack," "Hangman," "Hidden Word Search," "Othello" 
("Flip-a-Disk"), "Simon," and "Tic T^c TOe." 

*Regena, C. TI Games. Cotrpute! Publications, 1983. About 30 games for 
the TI-99/4A, mostly in TI BASIC^, but including 7 in TI Extended BASIC, 
including the excellent "Mystery Spell" and "Mosaic Puzzle." 
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Renko, Hal, and Sam Edwards. Terrific Games for the TI 99/4A. 
Addison-Wesley Publishing Company, 1983. A mixed bag of 30-some unusual game 
programs from the Netherlands in TI BASIC and TI Extended BASIC. 

*Singer, Scott L. , and Tony E. Bartels. Games TIs Play. DATAMDST, 1983. 
32 TI BASIC game programs based on the book Games Apples Play by Mark James 
Capella and Michael D. Weinstock. (Programs are available on disk. 

*Ton, Khoa, and Quyen Ton. Entertainment Games in TI BASIC and Extended 
BASIC. Howard W. Sams, 1983. Available with optional program cassette. One 
of the *best* program collections available; "Frogger"-lookalike "HcxneBound" 
is excellent. Book also contains a few non-game programs, e.g., "Address 
Inventory" and "Auto Sprite Editor." 

LOGO Programs and Programming for the TI-99/4A 

*Abelson, Harold. TI LOGO. McGraw-Hill Book Company, 1984. If you have 
TI KX30 II, you already have this excellent: book, bur if vou have TI LOGO (I), 
get it! 

Bearden, Donna. 1, 2, 3, My Catputer & Ms. Prentice-Hall, 1983. 
Ihough not jxist for the TI, this "LOGO funbook for kids" contains an arpendix 
on "editing features for tople LOGO, MIT LOGO, and TI LOGO." 

*Conlan, Jim, and Don Inman. Sprites, A Turtle, and TI LOGO. 
Prentice-Hall, 1984. "A friendly, playful introduction to the TI LOGO 
coipiter language," very well done. 

^Programming Discovery in TI LOGO. Texas Instruments, 1982. This 
attractive "student guide" was used by TBxas Instruments with their Ccxrputer 
Advantage -Clubs and is very well designed. 

Ross, Peter. Introducing LOGO: For the Apple II Cocputer, T«xas 
Instruments 99/4A, and Tandy Color Conputer. Ross ccxrtnsnts thiat "TI LOGD 
differs from Terrain LOGO and Apple LOGO in several iirportant ways. . . . The 
main difference is that TI LOGD has 'sprites' and 'tiles' as well as the 
turtle." TI LOGO II also has music. Ross's book is useful, but 
unspectacular. 

Thomburg, David D. Cociputer Art and Animation: A User's Guide to 
TI-99/4A Color LOGO. Addison-Wesley Publishing Cocrpany, 1984. This book is 
also an introduction to TI LOGO, more general in content than the title might 
suggest- 

*Vfett, Daniel. Learning with LOGO. McGraw-Hill, 1983. Although 
primarily concerned with Terrapin/Krell LOGO and secondarily with TI^LOGO, 
this is one of the best and most conprehensive books on LOGO presently 
available. 

Miscellaneous Books for the TI-99/4A 

*The Best of 99 'er: Volijme 1. Bnerald Valley Publishing, 1983. A very 
worthwhile collection of articles on "Starting Out," "Programming Techniques 
and Languages," "Inside BASIC and Extended BASIC," "LOGO," "AssCTibly 
language," "Catputer-Assisted Instruction," "Conputer Gaming," and 
"Applications and Utilities." 



Blackadar, Thcxtas, The Best of TI 99/4A Cartridges • SYBEX, 1984. As 
the title indicates/ this book only covers some of the cartridges (but, in m/ 
opinion / not always the best)^ Nevertheless ^ this is one of the few books that 
has any significant treatment of cartridges for the TI. 

Brewer / Bill. The TI-99/4A User's Guide. Macmillan/ 1983. How can you 
not. like a book whose cover blurb says this?: "Tliere is only one hone conputer 
priced below $100 that has a microprocessor as powerful as the expensive IBM 
PC's. And that hone ccxtputer has more educational cartridges produced for it 
than for any other system. It's the TI 99/4A/ the best computer value for its 
price on the market today." 

*Casciato, Carol Ann, and Donald J. Horsfall. The TI-99/4A User's Guide. 
Howard W. Sams, 1983. An excellent book, carefully done, by tvro authors who 
know the TI-99/4A well. 

Garrison, Paul. The Last Whole TI 99/4A Book: Programs and 
Possibilities. Wiley Press, 1984. Contrary to the promises on the cover, this 
is not "the only book you need," although it does cover a lot of ground (with a 
few inaccuracies here and there) . 

*Heller, David and Dorothy. Free Software for Your TI-99/4A. Although 
the information is not always entirely accurate, this book contains much 
information not readily available elsewhere. 

Micronova's Home Ccmputer Directory for the TI 99/4 (A). Micronova, 
1983. A very useful book when it first appeared, although some of the 
information is now significantly dated. 

The User's Guide to Texas Instruments TI-99/4A Conputer, Software, & 
Peripherals. Beckman HoTisef 1983. A usefiil guide "by the editors of Consumer 
Guide," this book has appeared in several different formats. 

Willis, Jerry, and others. Ihings to Do with Your TI-99/4A Conpiter. 
New American Library, 1983. Part of a series prepared by di lithium Press, this 
book is fairly cocpetent as an outside look, but uniiroressive. 

Albri^t, Ron. The Orphan Chronicles. Millers Grajiiics, 1985. A history 
of the TI Home Coopiter and sources of infomation about it. 

*Especially recomci^ided. 

This list {prepared by Barry Traver, 835 Green Valley Drive, PhiladeljAiia, 
PA 19128) is not conplete, but should prove useful to those who are interested 
in knowing more about some of the books that are available for the TI-99/4A. 
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A Description and Commentary on the Geneve Computer 
Some Implications for us all 
by Chris Bobbitt 
Pres i dent , Asgard • Software 

Copyright Chris Bobbitt 1986 

At its introduction, the Myarc Geneve computer will be among the most 
advanced computers available, and definitely the most advanced "home 
computer" in history. It is more powerful than many minicomputers, but 
is available at a price that would have been unheard of 3 years ago. 

The following is a description of some of the capabilities of this 
remarkable device. 

MICROPROCESSOR: 

The TMS99S5 CPU is 5 to 6 times faster than a TKS9900, the processor 
found in the TI99/4A. This processor is only slightly slower than the 
68000 CPU, yet is much simpler to use, more accurate mathematical ly, and 
contains a smaller instruction set. The advantages of this smaller 
instruction set is an article in itself. Suffice it to say that this 
technique, called RISC, is getting a lot of attention in programming 
circles. 

MEMORY: 

The standard Geneve Computer comes with 540K of RAM. This is expandable 
to 2 Megabytes using special memory expansion devices. A Myarc 5i2K card 
can be made to work'with the Geneve with simple modifications. The Myarc 
512K card memory may be directly accessed by programs. 

GRAPHICS 

The Geneve uses the Yamaha 9938 graphics processor. The 993S processor 
was designed by Texas Instruments and Microsoft Incorporated. ihe 
computer world will discover this chip and its capabilities much in the 
same way that they proudly announced 16 bit computing for microcomputers, 
years after TI had introduced the TI99/4A. This graphics processor 
supports a variety of different modes for graphics and text. 

TEXT 

The Geneve supports both 40 AND 80 column modes. The 40 column mode is 
similar to that of the 99/4A, so none of your current word processing 
software is obsolete. However, text, foreground and background colors 
may. be any of 512 colors. 256 patterns are available for redefinition. 
One of the 80 column modes is the same, while another supports blinking 
text and multi-color text. Some limitations apply, but this permits 
prograrraners of the system to use many of the advanced human factors 
graphics * techniques just now being developed. The use of color to impart 
information, much in the nature of peripheral vision can make word 
processing tasks was well as the initial learning process easier. Your 
Geneve computer will be able to keep up with this emerging technology for 



some time. Indeed the rich resources of the TI programming community may 
well result in some breakthroughs in graphics presentation. It is 
reasonably well known that some organizations in the community are 
working hard in this area. Since each of these various screens, occupies 
very little memory of the 128K of standard video RAM found on the Geneve, 
up to 32 screens of text can be stored in memory at once. All of this 
information is directly addressable by the programmer. This bodes well 
to provide a rich environment for the system and applications progranmier 
and thus the user. 

The Geneve supports every text mode of the 99/4A, as well as many new 
modes that use much of the available memory. One of the more interesting 
modes supports a resolution of 256 by 216 pixels. Each pixel can be any 
of 256 colors. This mode also supports multi-color sprites. Each pixel 
row of the sprite can be any of two colors. Another interesting graphics 
mode supports 512 by 424 pixels with each pixel any of 16 colors. The on- 
screen display of a maximum of 16 different colors can be selected from a 
pallet of 512 colors. This mode is the same resolution as the Apple 
Macintosh computer, yet the system still finds the capabilty to support 
sprites, which the Macintosh does not. The 9938 chip has built in 
commands for line drawing, block moves and copies at hardware speeds. 
Progranmers will have a rich, challenging environment for creativity, all 
at an affordable price for 99/4a owner and convert alike. 

INTERFACES 

The Geneve has a number of ports. For video, there is a port for an 
analog RGB monitor. The analog RGB monitor is more advanced than the 
digital ones used by the TI Professional Computer. Texas Instruments 
used the quality of the TI PRO monitor as a major component in its "Dare 
to Compare" campaign against the inferior IBM PC display sj^stem. An 
Amiga monitor displays the power of the Geneve quite well, and is readily 
available. However, an additional port permits the use of your existing 
TI99/4A video monitor. Therefore, your current equipment is not 
obsoleted by the new machine, allowing you the luxury of leisurely 
getting the best price for your existing monitor and cutting the best 
possible deal for your upgrade. Indeed, some are already at work seeking 
to separate early dropouts in the Amiga world from their monitors. The 
Geneve also supports the Amiga mouse. Other monitors of the serial RGB 
type work, however, so do not pay extra simply because the name on the 
front. 

Your 99/4A console can be used as a stand alone device with the purchase 
of the Geneve. The Geneve comes equipped with an IBM style keyboard. 
Other keyboards, costing from $50 to $500 will also work just fine. 
Sipce the Geneve replicates the functions of the console, you will only 
need the expansion system or one of the inexpensive expansion kits. 

A multifunction port permits even more access to the Geneve. While 
labeled as being for the Amiga mouse mentioned earlier, also can support 
sophisticated applications input from equipment both exotic and common. 
A video digitizer, for instance. Pictures taken from a video camera can 
be fed into the system. A digitizing tablet, which turns the Geneve into 
an elaborate data collection system or a component of a computer aided 



design (CAD) sytem is fully supportable, given proper software. Light 
pens are of course appropriate input devices as is information from a 
video cassette recorder or a video camera. Indeed, with external 
converter devices available on the market, you can pipe in television 
signals and enjoy crisp resolution and vibrant colors never seen before 
from a commercial television set, thus putting your RGB monitor on 
overtime. 

HARDWARE COMPARISONS 

To put this in perspective, compare the Geneve to other computers. The 
Geneve comes with 640K of RAM, equivalent to a fully configured IBM PC 
XT. This memory is expandable to 2 megabytes, twice the standard memory 
of an Atari 1040 ST. The Atari ST, of course, is one of the more popular 
"non IBM machines" on the market. The Atari ST is the fastest 
microcomputer available in its price range. The Geneve is roughly 
equivalent. The makers of the Geneve have^^gone to the extra expense of 
installing special purpose chips to handle, among other things, input 
from disks, lightpens, and other devices. In a similar vein, these 
special purpose chips handle output to screen, disk and elsewhere. And 
what about graphics? Again expensive special purpose redundance pays 
off. Therefore, in graphics, input and output, the Geneve runs circles 
around the Atari ST. The Geveve deploys eight times as many colors as 
the Cormodore Amiga. The Amiga is the superior machine in these 
respects. The Geneve, unlike the Amiga and the IBM PC AT, supports 
graphics with a 'true aspect' ratio. This is the superior form, and 
gives higher resolution through the use of square pixels, the tiny dots 
used to give your computer screen, even your television its color and 
appearance of depth. 

The Geneve rates hiahly as a smoothly uogradeable machine. It obviously 
will be compatable "'with the newly developed Myarc disk controller card. 
In disk drives supported, the Geneve with the Myarc disk controller card 
will defeat the IBM PC AT. Four 20 megabyte hard disks can be supported 
with this upgraded configuration, not to mention that the same scheme 
will control four (or less) double sided QUAD density floppie drives of 
the conventional 5 1/4 inch size. The drives that use the new plastic 
bound three inch disks are supported as well. Knowing the market, the 
Geneve makers realised they needed a system that would obsolete 
gracefully, as has the 99/4A. 

Features of the 99/4A which still challenge the marketplace are 
retained. An example is the 99/4A's well known device independant 
operating system. Virtually any peripheral can be attached, unlike 
almost all other computers including those costing thousands. Device 
independence is a feature you (the 99/4A owner) have purchased years ago 
and one that should not be discarded in the name of progress. Therefore, 
the Geneve is superior to most every micropcomputer in graphics, speed, 
memory capacity, and in versatility. 

A full blown Geneve system would contain a Geneve computer, a WDS model 
hard and floppy disk controller, a TI RS232 card, plus a 3 slot expansion 
kit, linked to two full blown 720 kilobyte floppy disk drives and a high 
resolution serial RGB monitor. If bought all at the same time, using all 



new components, your system would cost less than $1,000. One of the 
finest features of such a system is that it can and probably should be 
acquired incrementally, particularly if you currently own an expanded 
99/4A system. For a machine of this class, this is an incredible price. 
The Atari 1040 ST is well known as the first computer that cost less than 
One dollar for each one thousand bytes of memory, new. The Geneve may be 
the first machine to drive that cost down to fifty cents per thousand. 

SOFTWARE 

The Geneve will come bundled with a new version of Extended BASIC on disk 
which is fully 6 times faster than TI Extended BASIC. Also included will 
be a MS-DOS like _ operating system. The package is called "DOS like" 
because the commands used will be very close to MS-DOS. However, the 
internal workings of the system will not resemble nor be compatable with 
MS-DOS. This will be a boon for those who have had to struggle through 
learning MS-DOS at work or on another machine. In the package also will 
be an 80 column version of Tl-Writer with a larger memory. 

A number of other products specifically designed for the Geneve will be 
available at or near the release of the Geneve. A number of *C* 
compilers will be available by all expectations. C is a very popular 
language on 32 bit machines and is now beginning to appear in micro 
computers in the last few years. Some business software will be readily 
available. UCSD Pascal, actually a language within its own operating 
system, will also be standard. Software developed on many machines, 
including the IBM PC, Apple, and others which use this system will run 
without modification on the Geneve. 

The new Geneve software will allow users to set up directories as an aid 
to manage multiple files. A software RAMdisk will also be available, 
where the user can deal with a notional or in-software emulation of a 
disk. All interaction on this RAMdisk will be in memory, thus will 
operate at extremely high speed. Print spoolers will be available. 
People still pay $200 for print spoolers, which merely are hardware 
systems, now software, that fool both the computer and the printer. The 
printer is wired to signal the computer to stop sending data while the 
printer repositions the print head, or rolls up the platen. Meanwhile 
the computer is burning up thousands of cycles waiting for printer to get 
ready to receive data again. A spooler is nothing but an ever ready 
printer to the computer and a patient computer to the printer. The job 
is transmitted to the spooler in a second or two and you are ready to go 
again while the printer chunks away. 

TI BUSINESS MACHINES-The Geneve is assembly language compatable to the TI 
mini computer world, and awaits a member of that coiwnunity to make that 
software run. 

There is one silver lining in the "Perils of Pauline" development path of 
the Geneve, so fraught with delays. Time to think about the new arrival 
has been purchased with the sweat of the developer in a process which 
would normally have been extremely secret and quickly sprung on the 
unsuspecting community with little warning. 



NEW OFFERINGS 



One new company has been started specificly to develop Geneve software. 
A true multi-tasking operating system is among the goals of this firm. 
Multi -tasking to a user means that several programs can be run at the 
same time. Multitasking is at the heart of such programs such as 
Sidekick for the IBM where various panels, or windows are pulled down to 
allow notes and other activities to take place. 

Yet another goal for this new developer is a macro-assembler. Macro- 
assemblers are small utility programs that can be strung together to 
achieve a variety of. goals. In the mini computer world, programmers 
adroit in the macros of their particular machine rarely had to write much 
original code to achieve powerful results. This capability will soon 
arrive for you with the Geneve. 

Soon after shipments of the Geneve begin, BASIC and Pascal compilers will 
be made available by this startup firm. A compiler may not be a familiar 
concept to all who read this, though it is simple to pick up. When your 
99/4A receives the run command, it'wakes up and ^'interprets" the program 
you have told it to run; Every single time. You probably are aware that 
assembly language is faster. The reason for this is that it is closer to 
machine language and therefore requires minimal "interpretation." BASIC, 
however, along with a host of other languages is not that close to 
machine language. Easier to remember and use, but requiring some form of 
intervention. The interpreter is often used for BASIC. While it gives 
instant feedback, an interpreter is slower than a compiled program which 
is a machine or assembly language program. You write the program as 

usual, then run the program through a compiler. That program compiles a 
collection of assembly language or machine code conmiands. That 
"compilation" is what you then use when you need that program. The 
compilation is much faster, almost indistinguishable from a program 
written in assembly language. The 99/4A only recently got an example of 
a compiled BASIC and a compiled C. If you have yet to experience the 
utility of compilers, you will certainly enjoy the Geneve. The increased 
memory will, of course, make these compilers superior in performance to 
anything currently on the 99/4A. 

YET ANOTHER HUGE LIBRARY-Not one but two major resources are in the game 
plan for this firm. CP/M is an operating system that has its own cult 
following, and is still supported by a major commercial and cottage 
industry. Transfer of CP/M (and yes, IBM) disks to the Geneve is in the 
works. The firm is called Access Engineering, and is located in the 
Washingtn D.C. area. 

A HOST OF GENEVE SPECIFIC PROGRAMS are to come. Lou Phillips of Myarc 
has estimated that four to five years of effort will be needed to 
complete the full sweep of programs needed to truely tax the Geneve 
system and the chips associated with it. During that period, if a new 
design comes along, the card, not the entire structure can be modified. 
Almost irmediately however, terminal emulators, word processing programs 
that support such sophisticated typesetting concepts as proportional 
spacing will begin to arrive. 



'Gocdbye 'til we meet . 
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AN ASYLUM FOR ORPHANS. We're MICROpendium magazine in Round Rock, Texas. 
MICROpendlum covers only one subject: The TI99/4A. Since February 1984 MICROpendiunn has 
given its readers information on the TI99/4A in an issue eoeh monthi 

TOPICS WE'VE COVERED 

1^ Expansion systems 

Bulletin boards and telecommunicating 

BASIC and XBASIC programming hints 

Getting the most out of Tl-Writer 
^ Do it yourself SUPER CARTRIDGE 

Updates on nevs^ products 
»^ Getting into hard disk systems 
1^ Graphics programs for your Tl 

Computing for the disabled 

Freeware for the 99/4A 
1^ School computer literacy programs 

Forth programming for the Tl 
t/' Disk drives and disk drive controllers 

Reviews of software and hardware each month 

...and much, much more 
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□ U.S. third class mail, $17. 

□ U.S. first class mail, $20.50 
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MICROpendium Is your source for the best information on the TI99/4A home computer and 
compatibles. To keep up with news and views on your computer, subscribe now I 
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The Smart FrogrMmmer has long been recognized as the premier 
periodical for 99/4A programmers. Since lis 1986 merger with Super 99 
Monthly (Bytemaster's former newsletter), the publication has taken on a 
broader scope, providing invaluable material for power users and unparalleled 
tips for the active individual. 

In each issue, full program listings are presented. Bytemaster's 
newsletters have included many breakthrough programs for file manipulations, 
including creating llulUplan»« SYLK fUes from Extended BASIC, dumping an 
Extended BASIC screen for printing from the Formatter of Tl-Vriter. creating a 
Display Master command file automaUcally, creating an Extended BASIC graphics 
mode display from a TI-Artist Instance fUe. and converting an Assembly LIST 
file into an Assembly source file (yielding a single source file when the COPY 
directive is used). 

The Smart Programmer features tutorial articles on popular 99/4 a 
software, including Tl-Wrlter and llultiplan^". 

And. of course, as the publication's name implies. The Smart 
Programmer provides the best programming tips available, with coverage of all 
of the popular 99/4A languages, written in a straight- forward, easy to 
understand manner. Coverage has recently been expanded to include GPL, the 
language used in GROM memory and now programmable as GRAM with hardware such as 
MUlers Graphics' Gram Kracker^". Look for a new beginner's corner, 
coming soon! 

Your subscription to The Smart Programmer will provide you with 192 
pages of quality Inform&Uon, written by professionals, for less than the price 
of a typicsd program! 

The Smart Programmer Staff: Richard M. MitcheU (Editor): Craig MiUen 
Charles M. Robertson; Marlusz Stanryak; Steven J. Szymkiewicz, MD: Barr>' A. 
Traven DX. Warren 
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S2e.«e Sxirface Hail, Foreign 
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Payments accepted by check or money order in U^. funds, coded for processing 
through the Federal Reserve Banking System. No billings or credit sales. 
Dealer inquiries invited. Quantity discounts available. 
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DSEK NETWORK 99 is being formed as an ongoing source of shared 
information between owners and users of TI 99 /4A computers. 

It was originally conceived as User Group Networkj but in order to 
reach ALL owners the "group" portion has been downplayed. As this 
latest volume by Ron Albright will make VERY apparent^ there is a 
WEATLH of talent out there in User Land, It will be the purpose of 
U N 99 to find and circulate the production of these talents with 
ongoing supplements to "THE ORPHAN'S SURVIVAL HANDBOOK" 

Below you will find an "OFFICIAL REGISTRATION FORM" please complete 
this and return. This will establish an active mailing list for 
announcements of future updates and additions. 
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